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ABSTRACT 


The increasing demands upon large digital computing facilities 
have necessitated the developement and use of a system control 
program to provide for continuous automatic job processing. A 
comparative study of two current systems was conducted. The 
first, CDC FORTRAN 60, is described and its advantages and dis- 
advantages are pointed out. This system was modified by the authors 
to incorporate a remote ( satellite ) operation in a time shared mode. 
The second system studied was the CDC COOP MONITOR system. 
This system, a more complex, sophisticated control system is like- 
wise discussed. Modifications to correct certain disadvantages of 
this system are shown, along with the programming necessary to 
provide for remote station operation in the COOP MONITOR environ- 
ment. 

Several other programs which were developed by the authors to 
improve the computing center's capability are documented. These 
include; (1) A graph plotting routine utilizing CDC 1604/160 
computors and a CDC 165 / CalComp Plotter, (2) A large file 
merg sort routine, and (3) A data display “Line Printer" routine. 

The authors wish to express their appreciation to Professor 
Mitchell L. Cotton of the U.S. Naval Postgraduate School, and 
to the personnel of the school’s computing center for their kind 


consideration during the term of this thesis. 


il 


TABLE OF CONTENTS 


Section Title 
1.0 Introduction 
7) Fortran 60 System 


3 


4, 


m, 


0 


bigs 
1a 
233 
Oink 


] 
2 


Program Control 

Monitor 

Resident Routines 
System's Characteristics 
Zen. | Advantages 
pA Disadvantages 


Coop Monitor System 


Sel Master Control System 
oe Secondary Control Systems 
SiS System Operation 
3.4 System's Characteristics 
Set re Advantages 
Sane Disadvantages 
Said Alterations To Coop Monitor System 
3.6 Specifications for Further Modifications 
System Routines 
4.1 Grafplot 
4.2 Display “Line Printer Simulator" 
4.3 Merg Sort 
4.4 Satellite System Programming 
Bibliography 


APPENDICES 


Coop Monitor Library Edit Routine ( Libedit ) 
1604 Graph Plotting Routine ( Grafplot ) 
1604 Merg-Sort Routine ( Sort ) 

Fortran 60 Resident ( FortSat ) 


ral 


42 


LIST OF ILLUSTRATIONS 


Figure Page 
1. BLOCK DIAGRAM FORTRAN 60 CONTROL SYSTEM 

2. FORTRAN 60 "LOW CORE" RESIDENT ENTRIES 

3. BLOCK DIAGRAM COOP MONITOR MCS & EXTREC 23 
4. COOP MONITOR LIBRARY TAPE FORMAT 23 
5. FLOW DIAGRAM COOP MONITOR SYSTEM MCS 29 
6. PROGRAMMING FOR COOP MONITOR "BOOT" 36 
7. FLOW DIAGRAM CDC 1604 GRAFPLOT ROUTINE 53 
8. OUTPUT FORMAT FOR DD65 DISPLAY 61 
9. DATA DISPLAY MODEL 65 EXTERNAL FUNCTION CODES 62 
10. FLOW DIAGRAM FOR CDC 1604 MERGSORT ROUTINE 65 
11. FLOW DIAGRAM FOR CDC 1604 SATELLITE INTERRUPT 7 
12. CDC 160-1604 SATELLITE CONTROL WORD FORMAT 72 
13. LOGIC DIAGRAM FOR CDC 1607 SATELLITE STATUS 79 


LIGHTS AND PROGRAM CONTROL SELECTION 


ENCLOSURES 


1. OPERATING INSTRUCTIONS CDC 160 GRAFPLOT ROUTINE 
2. OPERATING INSTRUCTIONS CDC 160A GRAFPLOT ROUTINE 
3. OPERATING INSTRUCTIONS CDC 1604 GRAFPLOT ROUTINE 


iv 


MCS 
SCS 
RHT 
SIO 
AET 
AEDNT 
RBL 
ELT 
PLT 
FWA 
LWA+1 
VO 
BCD 
CDC 


ABBREVIATIONS 


Master Control System 
Secondary Control System 
Running Hardware Table 
Standard Input Output 
Available Equipment Table 
Available Equipment Driver Name Table 
Relocatable Binary Loader 
Edit Library Tape 

Prepare Library Tape 

First Word Address 

Last Word Address Plus One 
Input/Output 

Binary Coded Decimal 
Control Data Corparation 


a 


1.0 INTRODUCTION 


At present, the Naval Postgraduate School's computing 
center utilizes approximately 60% of its prime time processing 
short, 1 to 15 minute, "job shop", input programs. Practically 
all of these are of a scientific problem solving nature. Three 
different compiler/assembler control systems for processing 
these programs are currently in significant usage. They are 
the Control Data Corporation's "Fortran 60 System", the 
Naval Electronics Laboratory's "Neliac Compiler", and the 
school's own algebraic assembly routine, "Scrap". Of the 
above, the Fortran 60 System is the only system which 
incorporates a full control, automatic, job sequencing 
"monitor" system. Much more will be said about this "monitor" 
capability and the Fortran 60 System. The remaining 40% of 
the prime computing time is utilized for class laboratory 
instruction, maintenance and update of systems library tapes, 
data retrieval, schedule analysis, and other special job users. 

The non-prime time, 1630 to 0800, is scheduled block 
time for the various developement projects and long run 
programs. 

This environment places increasing demands uvon the 
computing center's capabilites. Not only is improved efficiency 
required but also more flexibility is in demand as the 
programmer's talents become more and more sophisticated. 

Several tasks were undertaken in the scope of this thesis 
project. Towards improving over-all system efficiency, a 
comparative study of the present Fortran 60 System and its 
proposed successor, "Coop Monitor/Fortran 62 System", was 
conducted. As a result, an outline and a discussion of the 
outstanding advantages and disadvantages of each system is 
incorporated in this thesis. 

Towards improved system flexibility, two new facilities 
were developed. They were the implementation of an operational 
remote (satellite) computing station and a system's provision 


for automatic graph plotting of two dimensional computer 


derived arrays. 

The full implementation of the remote station complex is 
a continuing group project with much remaining to be accomplished. 
As an aid to those who pursue this task, several recommendations 
are made and suggested methods for solving some of the 
problems are expounded. 

Besides the work accomplished in establishing the satellite 
station, another aspect of the center's services was improved. 
This was the provision of a graph plotting system. This 
required the developement of a plotting program for both the 
Fortran 60 System and a much improved and shorter Grafplot 
program for the Coop Monitor System. The major portion of 
this project was completed during the author's five week 
industrial tour at the Control Data Corporation, Palo Alto, 
California. The off-line processing of this graph plotting 
program was provided by rewriting, with many revisions, an 
existing plot drive program initially developed by the U.S. 
Naval Fleet Numerical Weather Facility, Monterey, California. 
Versions of this program were developed to operate on either 
the 160 or 160A CDC computers. The plotter employed is 
the CDC model 165/CALCOMP incremental plotter, This system 
has proven very effective and has enjoyed considerable usage. 
Although this provided an improved data output medium for 
the center, it has also stimulated an increased interest in 
utilizing the Digital Computer for project studies. Thus the 
center's task and effectiveness is ever increasing. 

A second method of data display was provided by utilizing 
a new cathode ray tube, Data Display model DD65, as an 
“on-line” line printer. Thus it is possible to monitor the 
Fortran System's output listings concurrently as it is listed 


upon the magnetic tapes for later off-line hard copy printing. 


This is a small programmed package to demonstrate a unique 


method of providing a "rolling page" effect on the display 


tube. The details of the technique are explained in section 4. 


It was originally planned to provide much more programming 
for the data display unit, however, the unexpected complexity 
of the Coop Monitor System limited the extent to which the 
authors were able to pursue this task. Modifications to the 
Coop Monitor System were made to couple the data display 
to the system. If time permits before termination of this 
work, the display driver routines will be completed to provide 
normal input/output capability between the display and the 
central processing computer. 

Two additional projects of secondary importance were 
completed. They were the provision of tape control programs 
to enable utilization of the 1607 magnetic tape units by the 
CDC 160 computers when assembling programs using the CDC 
160 OSAS Assembly System. The other project was the 
developement of a merg sort routine for large files written 
in 120 character BCD format. This sorting capability was a 
very desireable ability which had not previously been 
available at this installation. 
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2.0 FORTRAN 60 SYSTEM 


The Fortran 60 System is the present fortran processor 
in use at the Postgraduate School. It is maintained on a 
system library tape, recorded in binary format, 54 words per 
record, see ref.21. The records are grouped sequentually 
such that one record or several records may constitute a 
program package. These packages are referred to as being 
“subroutines”. The first such package on the system library 
tape is the System Control Routine and is titled "Resident". 
Operation of the system is as illustrated by figure 1. The 
figure points out the control transfer sequence which takes 
place after the resident program is "bootstrapped" into the 
1604 computer's memory. A short verbal explanation of the 
diagram follows: Initial "bootstrap" procedures are executed 
by the operator. This reads in the Resident program from the 
system library. The resident program then assumes control of 


the computer. 


2.1 Program Control 


The section of resident in which control normally resides 
is termed "Program Control". The function of program control 
is to interpret control instructions which will direct the transfer 
of control to some secondary control package or subroutine. 
All such routines must eventually return control to "Program 
Control". Normally program control reads its instructions 
from the console tvpewriter. These control statements may 
be any one of the twenty routine names shown by figure 1, 
or one of the eight transient program names which previously 
may have been "called" into core (memory) by the call routine. 
Some of the twenty control statements have arguments. The 


CDC Fortran System Manual and its update revision notices 
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discuss the use of these arguments and control statements, 
with the exception of the statement "SR". This statement 
was added by the authors to provide automatic call of eight 
frequently used service routines such as transfer, vfylib, 
list, copys, verify, etc. 

As mentioned before, normal operation of the control system 
requires that all sub-program packages, to which control may 
be transferred, must provide for returning control back to 
Program Control at the end of the directed processing sequence. 
Thus an examination of the resident programming, appendix IV, 
will find that it consists of several small programming sub- 
routines. Some of these are self contained and some are 
linked to other routines which assist in the performance of 


the functional task for which each basic package was designed. 


2.2 Monitor 


It has been pointed out that "Program Control" has a 
very responsible task in the organization of the system, since 
it is the prime control routine. The next most important and 
the largest ofthe programming packages in resident is the 
processor for the control statement, "Monitor" or sometimes 
called "Monitor Control". It is a routine to which program 
control can transfer control of the computer to provide auto- 
matic processing of stacked input Fortran Programs. Monitor 
is by far the most complex of the resident routines and yet, 
compared to the second generation system, Coop Monitor, it 
is rather simple. A full understanding of the monitor routine 
is best obtained by reading this section of coding in appendix 
IV. Briefly, operation of the monitor is as follows. Program 
Control receives a statement, “Monitor,3,4." This statement 
could have had up to seven arguments, but for this example 


two will be sufficient. This statement directs program control 


to transfer the arguments into the monitor control routine 

and then to transfer control to monitor. Monitor then tests 
certain flags to check if recovering from a previous job 
execution which lost control, requiring a forced recovery entry 
back to monitor. This not being the case, monitor then 
reqinds all output mediums, senses for input/output conflicts, 
initilizes for next library routine call, builds a tape assignment 
table, reads from the input medium (tape 3 in this example), 
detects a job description record, calls in the Fortran compiler, 
inserts the necessary arguments into the compiler, then 
transfers control to the compiler for compilation of the input 
program. If the program is successfully compiled, control 

is returned to monitor and monitor then transfers control to 

the program just compiled, this is termed "executing the 
program". If the program is successfully executed, it returns 
control back to the monitor which then returns to process the 


next job on the stacked input medium. 


2.3 Resident Routines 


The technique of transferring control of the computer has 
been demonstrated and we should now discuss a technique 
of utilizing the resident routines which are available to non- 
resident programs. The organization of the system provides 
what are called "low core" (cells 7 thru 35), entry points. 
These entry points are assigned to be the permanent entries 
to several of the programming packages contained in resident. 
All of these entries are shown in figure 2. Since these cells 
are permanently assigned, standardization limits a}l usage 
of the resident routines by non-resident programs to enter 
via the appropriate low-core cell. This then allows modifi- 
cations to be made on the system's "Resident" routine with- 


out influencing the non-resident routines. As illustrated by 


figure 2, eight of the low-core entry routines have switches 
which condition on whether monitor is controlling the job 
sequencing. If the monitor is in effect, then these eight entries 
are diverted in order to trap illegal monitor usage of input/ 
Output units. 

The low-core entry routines are rather self explainatory. 
They are mostly service routines such as read, write, equipment 
controllers, and message handlers. 

Nearly all the routines in resident fall into one of the two 
groups discussed. There are a few which are not in either 
group. These shall now be discussed. 

Two similar routines which have not been mentioned are 
the "Input Index Register Loader" and the "Output Index 
Register Loader" routines. These two serve to translate the 
alphabetical equipment designators into the equipment codes 
as listed on the first page of the "Resident List", appendix 
IV. These equipment codes are then loaded into index 
registers #1 and #2. The index registers then control the 
proper equipment selection for the read/write routines. 

Two other routines are the "Tape Read/Write" routines. 
These are both tape drive routines for controlling the system's 
magnetic tape units. The routines are commoly used by both 
the BCD and Binary Read/Write routines. The tape drive 
routines apparently were the only equipment drivers deemed 
worthy of individual programming. All other equipment 
drivers are embedded into the main body of the Read/Write 
routines. 

There is a routine called, "Initialize for Next Call". 

Its function is to reset the program bias and program counter 
cells, #62 and #63 respectively, prior to calling each 


program from the library tape. This routine is bypassed if 
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a "Hold" control statement was issued immediately prior to the 
issue of the "Call" statement. 

One final routine to be discussed is the low-core cell #22 
entry routine, "Chain". Its purpose is to call a named program 
from a designated library medium, then execute it without pack- 
ing any arguments. This provides a method of segmenting a 
program which is too large to fit into the available core memory 
along with its "Common Storage Data Arrays". Thus the segments 
can be called into core one at a time for execution. Each segment 
over-writes the previous segment. Processed data from one seg- 
ment to the next is inter-changed via designated common storage. 
This idea is extended one step further in the COOP MONITOR 
system by providing both segmenting and over-lay modes of 
operation. 

The remaining resident routines, which were added to resident 
by the authors, shall be discussed in section 4.2 and section 4.4. 
These sections concern the "Data Display Programming" and the 
"Satellite Station Programming". 


2.4 System Characteristics 


Perhaps the most significant characteristic of the Fortran 60 
System is that in its original form, its Resident control programming 
including all equipment control, job sequencing monitor, and 
basic service routines occupied only 4000 octal cells of core 
storage. The next most important feature of the system is its 
simplicity of organiztion when compared with the COOP MONITOR 
system. This is due, of course, to its limited scope. For some 
uses this simplicity is of great importance. Later the COOP 
MONITOR system will be discussed, at that time we shall see 
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that it has many advantages over the simplier Fortran 60 System. 
With this comparison to make, it is necessary to list the relative 


advantages and disadvantages of the Fortran 60 System. 


2.4.1 Advantages 


a. SIZE; As mentioned, the basic control programming was a 
modest 4000 octal cells The authors’ additiona! programming 
to provide a remote satellite computing station, and cathode ray 
tube data display facility increased the resident size to only 


5000 octal cells. This remains a fairly acceptable figure. 


b. FAST STACKED JOB PROCESS TIME; The Fortran 60 monitor 
operates in a mode which allows re-use of the Fortran Compiler 

by many different jobs. This saves library reference time and 
hence saves process time, provided the compiler remains un- 
damaged. The compiler compiles in memory only and uses no 
scratch tapes, this also leds to a very fast compilation. There 
are disadvantages to both these techniques whicn over shadow 

the advantages. These will be discussed as listed disadvantages. 


c. MINIMUM INPUT / OUTPUT UNITS REQUIRED: It is possible 
to operate the Fortran 60 System with only three I/O units operating. 
This can be a big advantage when several I/O units are inoperative 


or are assigned for utilization by the center's 160 computers. 


d. OPERATOR SERVICE ROUTINES; A well developed repertoire 

of operator service routines are an important advantage to a system. 
Fortran 60 has several such routines such as; endfile mark tapes, 
rewind, lock, duplicate tape, verify, list, etc. Given a little 
time, the COOP MONITOR System will probable incorporate several 


of these routines. 
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e, OPERATOR TRAINING TIME; At the Postgraduate School many 
students are given instruction, check-out, and direct access to 
the school's computers. As many as 250 students may participate 
in these laboratory periods per year. Fortran 60, with its sim- 


plicity provides a good vehicle for instructional purposes. 


f. MONITOR / OPERATOR REQUIREMENTS; The Fortran 60 
monitor system requires a minimum of operator intervention to 
process a stacked job run. Unless one of the jobs "blows the 
system Off-Line", ie ; manages to execute a storage or jump 
instruction erroneously, the system requires no operator assists. 
The COOP MONITOR requires considerable operator manipulation 
of "Jump Keys" and loading / unloading of tapes, etc. Thus the 
Fortran 60 System normally requires less operator supervision. 


g. LIBRARY MAINTENANCE; Library maintenance and updating 
should not be a daily occurance, however it is required frequently. 
Therefore a quick and reliable system to accomplish this task is 
required. Fortran 60 has three routines and a simple organization 
which make this an easy job. The routines are; transfer, vfylib, 
and list. In contrast, the COOP MONITOR System's "Libedit" 
routine is rather complex, is indirect via punched cards, and 
requires apriori knowledge concerning the current "directory" 

of routines on the library. It would he nice, if a directory dump 
routine was written and also an individual routine verify capability 


is required. 


h. MIXED FORTRAN and SYMBOLIC STATEMENTS; Fortran 60 
incorporates a fortran compatible symbolic language. Programs 
written for this system can inter-mix both symbolic and fortran 
statements on a line for line bases, if desired. For many uses 
such as programming shifts, logical and masking operations, 
searches, and other computer operations which the Fortran 60 
language doesn't provide, this ability has a distinct advantage. 


NS 


i. INTERRUPT ROUTINE USAGE; The only usage of the interrupt 
routine in the Fortran 60 System is for providing a real time clock. 
This would appear to be a gross neglect of such a powerful equip- 
ment capability The advantage, here, is that the provision for 

a satellite station operation requires much usage of this interrupt 
routine, hence having a system which doesn't utilize the inier- 


rupt in some ccmplex manner is unique. 
2.4.2 Disadvan*ages 


a. COMPILER VULNERABILITY; As mentioned under advantayes, the 
Fortran 60 compiler is normally called into the comrutér's memory 
only when initializing monitor processing of a stacked iob run. Thus 
there exists the possibility that one of the individua! jobs may poss- 
ibly damage the compiler. There after the remaining jobs of the 

stack are forced to be compiled by a compiler which is no longer 
reliable. This ca:. result in significant loss of computer and program- 
mer's time, since the programmer is led to believe his program was 


incorrect. 


b. SLOW TAPE HANDLING TECHNIQUES; Two standard length tape 
records are empicved. Standard binary records ere 54 words long. 
Standard BCD records are 15 words long, thus providing for 120 
character recor¢s. This standardization is an advantage in some 
instances. However, the disadvantage is the cost in time which 
must be paid since the tape motion must be stopped and started 
between each recorza. Tre COOP MONITOR &wstem soived this 
problem quite weil. A second detriment to tape nenadling is the 
lack of utilizinoa the buffer input / output channels to advantage. 
The only usage of the buffer capability is employed under monitor 
process contro]. in this instance, very poor usage is made since 
there is a complete disregard for error checking during input / output 


operations. This slow tape handling characteristic is a serious 
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One since much time is spent by the system in searching the 
library tape. The library tape can grow to be of considerable 
length due to the considerations discussed as a disadvantage 
due to "Multiplicity of Subroutines on the Library". GOOP 
MONITOR solved this problem by providing long variable length 
library records and a directory which prevents searching the 
full length of the library tape for routines which are "noi avail- 


able". 


c. PROGRAM SIZE LIMITATIONS; Since Fortran 60 doesn't 

utilize scratch tapes during compilation, it requires that memory 
must hold the resident program ( 4000 ) plus the compiler ( 14000 ) 
plus the compiled version of the user's program plus an undefined 
number of cells outside the compiler which are used by the compiler 
for tables and temporary storage. Thus the programmer losses at 
least 20,000 octal cells. This is a serious limitation in many 
large programs. COOP MONITOR has improved this situation, 

but at a considerable cost in speed, due to the necessity of re- 
loading the compiler for each job and also having to provide an 


intermediate and "Load and Go" tape. 


d. INEFFICIENT SPACE COMPILATION; Fortran 60 compiles the 
full size of arrays and reserved space into the binary object pro- 
gram (ie. card images corresponding to the compiled program ) 
at compile time. This coupled with the compilation limitation 
mentioned previously tends to further hinder efficient usage of 
memory space during compilation of programs. One advantage 
this does provide is that arrays and reserved spaces are initially 
cleared in a Fortran 60 program. This is not true of a COOP 
MONITOR compiled program. 


ey 


e. MULTIPICITY of SUBROUTINES on the LIBRARY; Portran 60 
requires that all subroutines called by a program be available at 
compile time. The reason for this is that they are embedded into 
the compiled program as it is compiled. If this compiled program 
is then added to the library, the library is unnecessarily length - 
ened. This is due to the fact that versions of the existing sub- 
routines are embedded in many programs. Not only does this 
scheme of compilation lengthen the library tape and thereby 

slow the system down, but it also creates very serious library 
maintenance problems. Thus the simple corrections or updating 
of a subroutine isn’t so simple anymore. In order to correct a 
subroutnie, it is necessary to re-compile all programs which 
use the subroutine. This is due to the embedding eifect. This 
can get to be a big bookkeeping problem and can create a lot 

of work. Again the COOP MONITOR System has solved this problem. 


f. NO PROVISIONS FOR MIXED BINARY / BCD INPUT PROGRAMS; 
Fortran 60 does not provide any method for inputting a binary 
program or subroutine into a stacked monitor run, if it is not 
already a part of the library. Thus no mixed input to the system 
is allowed. This requires frequent recompilation of subroutines 
and programs which are not incorporated onto the library tape. 
Again the COOP MONITOR / FORTRAN 62 System provides the 


solution. 


g. LIMITED "DE-BUGGING" AIDS; The only autcmatic de- 
bugging aids incorporated into the Fortran 60 System are the 
compiler and arithmetic error print-outs. The selectable aids 
consist of a "Map Language" (see ref. #21, pg #102 ) listing 
of the compiled program, and a few dump routines which were 
never very effective. A magnitude improvement has been made 
by the COOP MONITOR System towards providing de-bugging 


facilities, both automatic and optional. 
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h. UNDESIRABLE INTERMEDIATE LANGUAGE FORMAT; The inter- 
mediate language of the Fortran 60 compiler is “Map Language". 
This form of computer coding can become familiar, but only a 
small percentage of the general users of the computer facility 
were ever motivated to use it. Three "languages" for coding 

a single compiler seems to be more than should be required. 
Successful utilization of the Fortran 60 System requires a know- 
ledge of the fortran language, CDC Symbolic format, and of the 
intermediate language, "Map". The Fortran 62 system is a two 
language system and is quite acceptable except for the exclus- 
sion of the line for line inter-mix capability between fortran 


and symbolic coding. 


i. POOR INPUT / OUTPUT FLEXIBILITY UNDER MONITOR CONTROL; 
The Fortran 60 System originally had a very weak tape assignment 
system. It would assign tapes for scratch when the units weren't 
even loaded. This was corrected by the authors for the school's 
facility. Another deficiency is the inability of the monitor to 
provide multiple input / output BCD units. This is desired in 

many programs, for instance, when cumulative data is being 
generated and processed over a long period, or when special 


table lists are to be formed by a program, etc. 


j. SLOW CARD READ / PUNCH ABILITY; The school's “On-Line" 
card facility is a CDC 1609 system which is capable of operating 

at either 50 or 100 cards per minute. The Fortran 60 system 
provided operation only at the 50 card per minute rate. COOP 
MONITOR will run at the maximum speed of 100 cards per minute 
and compiles as it reads if the card reader is being used for input. 
This rate is still too slow for a general usage on-line input medium, 
hence it is used only as a back-up system for the IBM 1401 System 


which normally processes the card to tape conversion "off-line". 
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3.0 COOP MONITOR SYSTEM 


The COOP MONITOR SYSTEM was developed to allow 
a computer facility the ability to operate with only one 
"library" tape and yet effectively process any type of input 
programming or source language. This would eliminate the 
need to sort incoming jobs into separate groups to be run 
under individual library tapes. The advantage of a single 
library is readily apparent when operation from a remote 
station is anticipated, where the operator is physically 
separated from the main computer and unable to change the 
current system library tape. 

To increase COOP MONITOR'S flexability it is organized 
into two basic levels of control. At the highest level is the 
Master Control System (MCS), which maintains the overall 
system coordination and supervision. At the next level is 
the Secondary Control System (SCS), and there may be any 
number of these available on the library. Each SCS is 
designed to perform a particular job or combination of jobs 
depending on the requirements of the computer facility. 

A brief description will now be given covering the basic 
organization and operation of COOP MONITOR, for a more 


detailed description refer to ref.10. 


3.1 Master Control System 


To accomplish the desired system supervision, MCS is 
organized into nine functional subroutines and the Bootstrap 
loader (BOOT), see figure 3. BOOT and the first eight sub- 
routines make up the "permanent" resident, with the memory 
space occupied by the Job Sequencer ( 6000 cells) released 
for use each time control is given to the Secondary Control 
System. After the SCS has finished using the subroutine 
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"Loader" the memory space it occupied may aiso be released 


for use by the current program. This procedure allows MCS 


to be very large and complex (13500 cells) and yet not unduly 


penalize an input program in memory space recquisements. The 


basic functions of each subroutine are as follows: 


a. BOOT; Contains the Available Equipment Tabie ( AET), 
which enables MCS to determine the input/output units 
available to the computer and their intended use. This 
routine will load on option either MCS or the system recovery 
dump routine "EXTREC". BOOT also contains the MCS flags 


to store current job information to allow intra-job continuity. 


b. CLOCK; Allows use of the computer real time clock to 
set a time limit on the current job. This routine is available 
to the programmer to set one additional time limit and also 


may be used to determine elapsed time. 


c. MEMREC; Maintains a record of the limits on the one 
contiguous block of available memory between resicent and 


any programs loaded into high core. 


d. OPCON; All communication between the computer operator 
and MCS or SCS is thru this routine. This input or output 


is normally via the console typewriter. 


e. INTERRUPT; This routine has three sections, SELECT, 
DETECT, and REMOVE. These allow for the selection and 
detection, or the release of any of the interna! computer 


interrupts or on channels 1 to 6 inactive. 


an 


f. READ/WRITE; This subroutine controls all input/output 
operations of the computer. Provides protection from illegal 
use of any unit and prevents interference between units on 


the same channel. 


g. ERROR; Used in the event of user program failure or the 
detection of illegal operation by MCS, entry into this sub- 
routine will terminate the current job. ERROR will output 
the current contents of all the console registers (on the 
standard output medium) and the lower address of cell 7, 


and then determine if the user desires a memory dump. 


h. RW1607; The driver for the magnetic tape units and the 
only driver contained within MCS. This subroutine is the 
only place where tape units are selected and activated, 
except in BOOT for loading MCS or EXTREC. 


i. LOADER; Loads all relocatable binary programs or sub- 
routines either from the system library or user provided input 
medium. This subroutine packs programs into high core memory 
with common block storage assigned to low core just 

following "LOADER". 


j. JOB SEQUENCER; Used between input jobs to set program 
limits, determine and load input/output drivers requested by 
the user, and to call and transfer control to the desired 
Secondary Control System (SCS). This subroutine also 
contains the programming to process any computer operator 


statements received via "OPCON", 


These functional blocks are closed subroutines with multiple 
entry points depending on the particular function desired. These 
entry points are available to all routines and must be used 
whenever one of the above operations is necessary. This also 
includes other blocks within MCS, example, The JOB SEQUENCER 
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must use LOADER to make a library call, and LOADER in 
turn must use RW1607 to actuate and read the magnetic 
tape unit. These subroutines operating together as a Master 


Control System provide the following features: 


a. Automatic, variable job. sequencing, including accounting 


records and time and output line limits set for each job. 
b. Operator-Machine communication. 


c. Assignment of all input/output units and the loading of 


the necessary drivers for these units. 


d. Single linkage to all input/output drivers to protect them 


from interference and illegal use. 
e. Flexible linkage to the CDC 1604 interrupt features. 


f. Automatic recovery features in the event of "user" program 


failure. 


g. Calling and tranfer of control to any desired Secondary 
Control System (SCS). 


The assignment and control of input/output equipment by 
the MCS is accomplished thru three tables. The first, the 
Available Equipment Table ( AET), lists all the input/output 
equipment connected to the computer. Some of these J/O 
units are designated as "standard" (SIO), and are assumed to 
be always available for use by the system. The entries in the 
AET (one for each I/O unit), contain the following information: 
Allowed use, current job assignment, standard unit or not, 


equipment type, and the location of the I/O driver name. For 
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a complete description of the AET entry format see ref.10. 

This table is set for each installation and is changed only 
as equipment status changes. A listing of the current AET 
| is shown in figure 6c. 

The second, the Available Equipment Driver Name Table 
(AEDNT), lists the name and entry point location for each 
I/O driver subroutine for controlling the units listed in the 
AET. The entries are two words long. The first word contains 
the entry point locations of the routine if it is in memory, or 
an exit to MCS if not in memory, see section 3.5 part D for 
an example of an AEDNT entry. 

The third, the Running Hardware Table ( RHT), lists the 
input/output assignments of units for the current job only. 
The entries are AET entries with the address of the proper 
driver entry point inserted and the allowed use set. Logical 
unit numbers are used as an index to this table, logical 
numbers 1-49 are available to the programmer, 0 is reserved 


for the system library tape and 50-63 for standard units. 


3.2 Secondary Control Systems 
The great flexibility possible with the COOP MONITOR is 


in the use of a Secondary Control System (SCS) to control 

the processing of a specific job. There can be any number of 
Secondary Conrol Systems which may be written by each computer 
facility to handle the specialized needs of its users. Thus 

for use at the Postgraduate School the standard "stacked job" 
daily production runs would be controlled by one SCS, and a 
satellite digital controller simulation by a different SCS, and 

a real time radar intercept problem by a third SCS. All of these 
SCS would be placed on the standard library tape and available 
within a few seconds after a particular one is called from the 
library. No modification is needed in the standard COOP MONITOR 
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to use a different SCS. The name of the desired SCS is 
given to the JOB SEQUENCER in MCS at the begining of each 
job and this name will go to LOADER and the SCS will be 
loaded from the system library. 

There are two SCS provided in the present version of COOP 
MONITOR, these are called "COOP" and "LIBEDIT". A brief 
description of each is given to illustrate the technique of 
tailoring a SCS to do a specific problem. The first, COOP, 
is responsible for the intra-job sequencing necessary to 
compile and execute an input job, ie; the calling of compilers 
or assemblers, transferring binary card images to a “load and 
go" tape, calling LOADER to load the "load and go" tape and 
finally, execute the loaded program. The present version of 
COOP can call two compilers, FORTRAN-62 and CODAPI 
(actually an assembler), but COOP can be modified to accept 
any number of compiler languages. COOP also contains 
internal routines for user controled binary deck manipulation, 
loading and execution. 

The second, LIBEDIT, has two subroutines, Edit Library 
Tape (ELT) and Prepare Library Tape (PLT). Edit Library 
Tape is used for minor changes in the system library such as 
a deletion or addition to the subroutine file or within MCS and 
EXTREC. This secondary control system makes a copy of the 
present library tape upto the point of the desired change and 
then inserts or deletes the proper information. For a detailed 
description of the steps necessary in a complete LIBEDIT, see 
appendix I and ref.17. Prepare Library Tape is used for major 
changes to the system library. The user must now supply all 
the information necessary to produce a new version of the 
system library tape, nothing is copied from the old library 
tape. LIBEDIT does not provide any means of verifying the 


portions of the new library tape that were not changed. 
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3.3 System Operation 


A brief description of the operation of MCS can now be 
given, for a more detailed description see ref.10. The first 
record of the library tape, BOOT, see figure 4, is read into 
the computer by manually selecting and activating the proper 
magnetic tape unit. BOOT is then executed at cell #2, see 
figure 6, and will verify the AET table and then skip over 
the next record on the library tape, EXTREC, and load MCS, 
see figure 4. Control is now given to MCS which determines 
the standard input/output units (SIO), loads the necessary 
drivers for those units if they are not in memory, fills the 
unused memory space with a jump to ERROR instruction to 
trap user program failures, and then notifies the computer 
Operator the system is ready to accept job assignments. The 
operator then either signals MCS to alter the AET or SIO 
assignments or to begin processing the “stacked job" on the 
standard input. When signalled to begin processing, MCS 
reads the control card from the standard input, logs the first 
job on the standard outputs (list and punch tapes and the 
console typewriter), and sets the time and output line limits 
for the current job, the recovery key is stored in BOOT. The 
input/output units needed, in addition to the standard units, 
by the incoming job are determined and assigned and if the 
proper drivers are not already in memory they are called and 
loaded. MCS then releases the memory space occupied by 
the non-permanent section of MCS (Job Sequencer) for use by 
the SCS or the input program. The desired secondary control 
system is determined and loaded into memory and MCS then 
transfers control to this SCS, see figure 5. Whenithe SCS 
has finished processing the current job, control is returned 
to BOOT with an indication for a "normal" or "abnormal" job 


termination. For a "normal" termination BOOT reloads MCS 
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and if there are more jobs on the standard input, the cycle 

is repeated. For a "abnormal" (error) termination a "Console 
Scoop" (the contents of all the console registers ) is prepared 
and sent to the standard output tape to aid the programmer in 
debugging efforts. The recovery key, set by the user at the 
start of the job, is examined to determine of a memory dump 
is desired, if not control is given back to BOOT for a MCS 
reload and the process continues as before. When a memory 
dump is desired control is returned to BOOT for a EXTREC load, 
see figure 6. Extended recovery then provides the desired 
memory dump on the standard output tape and returns to BOOT 
for a MCS reload. Again if there are more jobs on the standard 
input tape MCS will start the sequence over, otherwise it 


will terminate this run and notify the computer operator. 


3.4 System's Characteristics 


Once over the initial shock of working on a system of this 
size, the next effort was to consider COOP MONITOR'S good 
and bad characteristics when the special requirements of the 
Postgraduate School computer center were included in the 
system. These special requirements included the daily "stacked 
job" production runs of short duration, longer runs by the 
students during the evening, the increased use of the satellite 
capability of the schools computers, and the addition of a 
sophisticated digital display unit ( Data Display Inc. DD65 ) 
as a remote computer input/output device. In this light the 
COOP MONITOR was determined to have the following major 


advantages and disadvantages: 


3.4.1 Avantages 


1. The system can handle stacked input jobs written for 
multiple compiler languages. The present version includes 
Fortran-62 and Codapl and the addition of the Neliac compiler 


and the Scrap assembler is possible. 
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2. Operates with multiple secondary control systems each 
specifically designed for a job. Present system has two, 
COOP and LIBEDIT and others may be added to process 


satellite and remote display problems. 


3. Automatic, programmer controlled, debugging aids such as 
the “console scoop", provided in the event of program failure 
and the "snap" feature for those that do not fail but also 


do not produce correct results. 


4. Automatic system recovery in the event of failure by 


the input program. 


S. All input/output is thru one routine, therefore it is very 
difficult for an input program to illegally use any I/O unit. 


Interference between units is also minimized. 


6. COOP can accept mixed, binary and source language, 


input programs. 


7. Magnetic tape driver routine uses variable block read and 
write for maximum speed when controlling the system library 
tape. All read/write is buffered, with parity and length checking. 


8. Variable standard input/output units are allowed and 


these can be changed before each job. 


9. Multiple input/output units for each job are allowed 


up to the maximum available to the computer. 


10. The system is capable of handling very large input programs 
as MCS releases memory and the compiler used is over 
written when the program is loaded for execution. For programs 


that are still too large, segmenting and overlaying are provided. 


31 


11. The compiler used, Fortran-62, has special features all 
its own; easy to read intermediate language ( Codapl), 
buffer operation for input/output, and single library subroutine 


call for each program. 


12. Compiler is reloaded for each job thus assuring a clean 
start. 


13. The system will accept Fortran-63 when it is available. 


3.4.2 Disadvantages 


1. The system is very large (13500 cells) and complex, 
making it difficult to gain the understanding necessary to 


perform any system modifications. 


2. Many complex (at first) control cards are necessary to 


process each input job. 


3. Provides an unused and unsuppressable accounting 


information output on the paper tape punch. 


4. Normal system operation requires a large number of standard 
input/output units to be operating. Four magnetic tape units 
(library, punch, input, and output), the paper tape punch for 
system accounting, and the console typewriter are required 


to satisfy the "standard" I/O requirements. 


5S. Inability of the computer operator to add or delete a 
standard input/output unit (the type of I/O unit can be changed). 


6. Step by step operation by the computer operator via the 


console typewriter is not possible. 
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7. The interrupt schedule is not compatable with a real 
time problem solution in a micro-second time sharing mode, 
due to the frequent use of interrupt lockout. No provision 


is made for operation from a remote ( satellite ) station. 


8. No programmed restart available for use by non-autoload 
CDC 1604 computers (the autoload must be simulated by 


manually performing the required instructions ). 


9. No operator service routines are available such as call, 


copy, transfer, verify, etc. 


10. Program errors are sent only to the standard output tape 
requiring the user to list this tape before determining any 
errors. 

ll. The system would not output/input on the CDC 1609 


card punch/read unit available at the computer facility. 


3.5 Alterations To Coop Monitor System 


After a basic understanding of the Coop Monitor System 
was obtained, it became apparent some modifications would 
be required before the system would be acceptable for 
operation at the Postgraduate School's computer facility. 

The first modification attempted was the alteration and 
corrections needed in the cardread and cardpunch drivers to 
allow operation with the CDC 1609 card read/punch unit. 

In addition to the corrections, it was also necessary to rewire 


the unit's plugboard to make the read/punch format compatible 


with the Coop Monitor. These read/punch routines are an 
improvement in speed to 100 cards per minute vice the 50 
cards per minute available with Fortran-60. Once the drivers 


were corrected, they were recompiled and the binary versions 
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were added to the system library tape using the secondary 
control system "LIBEDIT". For a complete description of 

the LIBEDIT procedure, and the input job format see appendix 
I. The correction of these subroutines provided a library 
tape more suited to the needs of the school computer center 
but still left some major deficiencies in the system that 


would prevent convenient operation. These were the following: 


a. The unsuppresable accounting medium being output on 

the paper tape punch, requiring the punch to be selected at 

all times. This made the paper punch unavailable to the 

user as an Output device. 

b. No provision for a programmed restart for operation on 

a non-autoload computer (CDC 1604). In the event of MCS 

failure a manual "bootstrap" is required. 

c. Error messages from MCS "LOADER" are not available to 

the user except by listing the standard output medium. 

d. No provision for handling operation from a remote station. 
The correction of these deficiencies all had one thing in 

common, they would all involve changes within the structure 

of MCS. Many early failures soon made it apparent changes 

in MCS could not be made without a complete understanding 

of the internal organization of MCS, and a positive knowledge 

of the operation of LIBEDIT. After these two programs were 

more thoroughly understood, the modifications resulted in the 

successful production of a new library tape providing these 


new features: 


a. Accounting medium suppressed, the paper tape punch is 
not selected unless the operator intends to use it as an 


output medium. 


b. A programmed restart is available, at cell #30, and 
this will simulate the "autoload" feature of the CDC 1604A 


except for the initial load. 
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c. All error messages from MCS "LOADER" are now also 
output on the comment to the operator medium, normally 


the console typewriter. 


d. All linkages necessary ( AET and AEDNT entries) for 

the calling and execution of a driver subroutine for the 

remote display (DD65) are now in MCS. Space required 

for this driver is reserved (1000 cells) within the "permanent" 
section of MCS just prior to LOADER. 


These modifications now provide a library tape that 
should be much more convenient for the computer center to 
use and at the same time provide a system that will readily 
accept experimental drivers and subroutines for operation from 
the remote station. The detailed explanations and coding 
involved in these modifications are shown in the following 


sub-sections. 


A. Modifications to BOOT 


The postgraduate schools computer (CDC 1604) is a non 
autoload machine and thus requires a manual selection and 
activation to read the library tape. The COOP MONITOR uses 
the autcload feature anytime there is a failure of the automatic 
recovery routine. To avoid the necessity of this manual 
"bootstrap" each time this may occur a simulated autoload was 
placed into BOOT starting at cell #30. This allows an 
"autoload" restart when needed. At the same time the standard 
input/output assignments in the Available Equipment Table 
( AET ) were altered to provide the followins: 


Library on channel 3/4, tape unit #1 

Input on channel 3/4, tape unit #2 

Available for use, channel 3/4, tape units #3 and #4 
Output on channel 5/6, tape unit #1 

Punch on channel 5/6, tape unit #2 

Scratch 1 and 2 on channel 5/6, tape units #3 and #4 


=r OC. Ome. 
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All references to channel 1/2 magnetic tape units were 
removed (the school has no units available) and the I/O 
linkage for the remote display driver was inserted, see figure 6. 

These modifications to BOOT altered the location of the 
begining of the AET and the subroutine EXTREC uses this 
location as an absolute address. This required recompiling 
EXTREC with the correct address for the AET and then placing 
this on the system library tape again using the routine LIBEDIT. 


B. Suppression of Accounting Medium 


The original version of COOP MONITOR provided for 
accounting information to be output on the paper tape punch. 
This output was of unknown format and therefore of no use to 
the computing center. This did demand the paper punch be 
selected and prevented the use of the punch as an output 
device. The suppression of accounting output was accomplished 
by taking advantage of the READ/WRITE subroutine in MCS. 

7 All I/O requests must be thru this routine and this includes 


any requests for output to the accounting medium, normally the 
paper punch. Logical number 55 is reserved for the accounting 
medium and to suppress the output a test for logical 55 is made 
each time READ/WRITE is entered. If the entry is for any 
logical number except 55 the request is processed. If the 
request is for logical 55 a no action exit is made. 

This test is made by adding the following programming to 
the READ/WRITE section of MCS at approximately cell 1225. 


INA -55 Test for accounting 
AJP N *43 Jump if not accounting 
INA 2 Build exit to suppress 
SAU MRW800 accounting output 
SL] MRW800 Jump to exit 
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This suppresses the accounting output but still allows 
the paper tape punch to be used as an output medium if 
desired. Unless the punch is to be used as an additional 


output unit is need not be selected. 


CG. Loader Errors to the Operator 


Many of the failures of programs to run under the COOP 
MONITOR result from errors detected by the subroutine LOADER 
in MCS. These errors cause messages to be written on the 
standard output medium and this must be listed off-line (unless 
the standard output is an on-line printer) before the operator 
can determine the cause of the error. To allow the error 
message to also be output on the comment=-to-operator medium, 
normally to the typewriter, the following programming was added 
to the subroutine LOADER in MCS at approximately cell 6274. 


RTJ WRITE Errors to operator 

01 53 BCD Unit # 
03 LERR Write/Check FWA 
00 LERR+5 LWA+1 
NOP Error return 

NOP 


Loader errors are now immediately available to the computer 
operator as the program is being run to assist in the correction 


and possible rerun if desired. 


D. Linkage for Remote Display 


The addition of a I/O subroutine for remote operation of 
a digital display unit (DD65) requires that proper entry linkages 
be entered into MCS. This will permit the driver to be called 
(if not within the MCS) and executed. These linkages are 
in the Available Equipment Table (AET) and the Available 
Equipment Driver Name Table (AEDNT). Both of these links 
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have been provided in the present ( modified) version of the 
library tape. In addition, a reserve area of 1000 cells has been 
made available within MCS (cells 3060 to 4060) to contain 
the programming for the display driver. 

The AET entries (in BOOT) are shown in figure 6 and the 
AEDNT entries are located at the end of the subroutine LOADER, 
at approximately cell 6460 in MCS. These entries are: 


BCD DISPLAY 
SEV 3070 
SL] HOWLER 
where SEV indicates the driver is within MCS 


and 3070 is the entry point address of the driver 


This link therefore requires the display driver to have 
its entry point located at cell 3070 to be executed properly. 
If a new entry address is desired it must be entered into 
the AEDNT, the AET entry need not be changed. 


The final modifications made to the COOP MONITOR system 
were the addition of two subroutines to the library tape. These 
subroutines were: 1. Grafplot, to allow a graph of any two 
designated arrays to be drawn on an incremental plotier, see 
section 4.1. 2. UCSD, a new Secondary Control System 
written by the University of California at San Diego, which 
allows the use of simple control cards for running "stacked 


job" input for compile and execution. 


3.6 Specifications for Further Modifications 


The modified version of COOP MONITOR is now ready for 
the next step in the development of an operating remote station 
capability. This is the programming and insertion into MCS 
of a remote station display (DD65) driver, the alteration of 
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the system interrupt handler ( SELECT, REMOVE, DETECT) to 
allow remote station interrupts and a subroutine to display 
graphical information on the remote display. The specifications 
for these three modifications are discussed in the following 


sub-sections: 


A. Remote Display Driver 


This subroutine would allow the display to function as 
the comment-to-operator medium, normally the console 
typewriter. One of the subroutines for this driver has been 
completed and is fully described in section 4 2 “line printer 
simulator". This subroutine will produce a line by iine 
display on the console (DD65), that will move upward with 
the arrival of each new line, like a typewriter Only the upper 
half of the tube face should be used for the "line printer" 
to allow the lower half to be used as a "status board" for 
computer input or output assignments and any special 
information for the remote station operator. 

To correctly process input/output requests from COOP 
MONITOR ( from READ/WRITE) the remote display driver must 
accept the standard calling sequence and correctly respond to 
the ‘parameters specified. The specifications for the standard 
calling sequence is now given in the COOP MONITOR 


format: 
TITLE: DISPLAY 
PURPOSE: To input from or output to the remote station 


display (DD65) in a format compatibie with 
the COOP MONITOR. 
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USAGE: Calling Sequence; 


ENA Location interrupt routine 
16. RTJ DISPLAY 
R.M. Om 
L+l a Or A 
I B 
L+2 Alternate Return ( error ) 
If 
L+3 Normal Return 


R.M.= Recording Mode, 1 if format is BCD 8 char/word 
2 if format is 8 typ. char/word 


3 if format is 1 typ. char/word 


BCD 8 char/word; implies the internal format is BCD with 
blanks replacing typewriter characters for which there is 


no BCD equivalent. 


8 typ. char/word; implies the internal format is 8 typewriter 


characters per word. 


1 typ. char/word; implies the internal format is 1 typewriter 


character per word. 


E.C.= Equipment Code with format CORXX 
C= Channel number (7 for display ) 
R= 1 for input, O for output 
X= Not interpreted 


= Interrupt Selection 
l= With interrupt, use the address in the A register 


0O= No interrupt, ignore the address in the A register 
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F.G.= Function Code explained below. 


A, B, E= Detailed under each function code. 


Functions: In all cases if a parameter error is encountered 
E is set equal to 0 and control is transferred to the alternate 
return. Parameter errors are such things as channel not equal 
to 7, R not equal to 0 or 1, incorrect function codes, etc. 
E is always set to reflect the case in which the typewriter 
(simulated by the display) is left. This has no meaning for 
the display but the correct response if necessary for COOP 
MONITOR. The 2° bit of E is set to 1 for upper case. 
F.C.=1 

Starts transmission of data to or from an area specified 
by the first address (A) and the last address plus 1 (B). In 
some cases a conversion and/or packing/unpacking operation 
is required by the recording mode. 
For input, R.M.=1 (BCD 8/wd) 

Keyboard input with no interrupt on catriage return is selected. 
Characters are packed eight per word until the area from A to 
B-1 is filled or carriage return is sensed. If carriage return 
is sensed fill out the last word with blanks if necessary. 
Interrupt On carriage return is selected and an exit made with 
the number of words read in the A register. 

R.M =2 (Typ 8/wd) 

This mode is the same as R.M.=1, except the BCD code 

from the display must be converted to typewriter characters. 
R.M.=3 (Typ 1/wd) 

The characters are read, converted to typewriter code, and 

stored one per word in area A to B-l. Interrupt on carriage 


return remains selected. 
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For output, R.M.=l1 (BCD 8/wd ) 

The information from A to B-l is packed into the proper 
format for the display and output. If the message overflows 
a three line buffer (186 characters) the overflow is lost. 

R.M.=2 (Typ 8/wd) 

The information from A to B-1l is converted to BCD and 

packed into the display format and output. 
R.M.=3 (Typ 1/wd) 


Same as R.M.=2 above. 


F.C.=2 Check only 

Control is returned with the number of words transmitted 
by the last read ( R=1) or write ( R=0) operation. This 
function if needed to satisfy MCS which assumes some of 
the transmissions are buffered and therefore it must return to 
the driver a second time to determine the number of words 
"buffered". 


F.C.=3 Read/Write with checking 
Same as the operation for F.C.=l, with the number of 


words processed entered in the A register before returning. 


F.C.=4 Sense Equipment Ready 

Determine if the display is in a "ready" status, if it is 
not ready set E to 1 and use the alternate return. If it is 
ready set E to indicate the current status for the "case" and 


use the normal return. 


The present COOP MONITOR does not use any of the 
provisions incorporated for F.C. greater than 4. The driver 
routine need only check that the function code is within the 
range 1 to 4. If not set E=0 ( parameter error) and use the 


alternate return. 
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B. Coop Monitor Interrupt Package 


Before any great amount of programming can be done to 
adapt COOP MONITOR for remote operation, the present 
interrupt package ( Select, Detect, and Remove ) must be 
modified. This subroutine can presently select and sense 
interrupts on channels 1 thru 6 inactive and all internal 
interrupts. It cannot select or sense satellite generated 
interrupts on channels 3/4 or 5/6 via the CDC 1607 magnetic 
tape units, nor can it select or sense any channel 7 interrupt. 

The calling sequence for the interrupt subroutine, see 
ref. 10, uses the integers 1 thru 12 to set the type of 
interrupt to be selected and sensed. The integers 1 thru 8 
are used for those interrupts to be removed. These calling 
parameters need to be increased to provide the following 


additional options. 


For Select: 


Type Interrupt Action 

13 Select program control for channel 3/4 
14 Select program control for channel 5/6 
US Interrupt on keyboard 1 hit ( DD65 ) 
16 Interrupt on keyboard 2 hit ( DD65 ) 
17 Interrupt on radar target hit ( DD65 ) 


For Remove: 
To avoid confusion use the same parameters to remove 


the above selections 


Before any of these changes are attempted the precautions 
necessary for programming an interrupt package, discussed 
in ref. 13, must be carefully considered 

Along with these modifications to the interrupt subroutine, 


the main frame of the computer should be modified to allow 
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computer selection of interrupt lockout This wouid avoid 

the present procedure of selecting interrupt on arithmetic 

fault and then forcing a fault just to place the computer in 
lockout mode. There is just such a routine in MCS ( RLOKOUT  ) 
to perform this function. This takes 20 instructions to 
accomplish what could be done with one. These modifications 
would be similar to those described in section 4.4 to provide 


computer selection of remote indicator lights. 


C. Data Display Graph Plot Routine 


The incremental graph plotting system has been operational 
for approximately six months, see section 4.1. A routine 
to provide this graph plot capability utilizing the Data Display 
unit (DD65), still needs to be completed. The following 
specifications and suggestions should provide an outline 


for incorporating this "Graph Display". 


1. Use the author's scaling routine to scale to units per inch. 
2. Use this scale and 16 increments per inch vice the 100 
per inch used in the incremental system to build a scaled 
integer array of coordinate points. 
3. Output the axis, titling, and labeling data using the 
standard "Grafplot" technique. 
4, Curve drawing requires extensive use of the string 
capability of the display in order to provide for multiple 
curve graphs. This is due to the relatively small, 1024 cell 
24 bit, memory of the data display. 
5. Memory allocation in the DD65 Display should be about 
as follows: 
a. Vertical and Horizontal Axis, 8 inches long. Use 
vector size 64/line. Requires 40 cells. 
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b. Labels, 4 DD65 words/label. 18 labels requires 
72 cells. 

c. Titles, A minimum of about 200 cells 

d. Curves, Total memory usage of above is 312 cells. 
This leaves 714 cells for curves Using the string 
vector mode this will provide storage for approximately 


2500 vectors. 


6. Using only the smallest vectors this will provide for 
approximately 20 traverses of the display tube. Assuming 
that an average curve traverses the tube 4 times, it appears 


that 5 curves may be displayed simultaneously. 


Besides an on-line graph display routine, another routine 
which is very desirable would provide an off-line display 
of the graphs which were output by the CDC 1604 program 


for “hard copy" incremental plotting. 
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4.0 SYSTEM ROUTINES 


Several system routines were written for both the Fortran 60 
System and the Coop Monitor System. Four of these routines, 


which were developed, shall now be discussed. 


4.1 Grafplot Routines 


The 1604 Grafplot Routine, see enclouse3, was written for 
the CDC 1604 computer. It generates a magnetic tape output in 
the format required to drive the 160A Grafplot Routine, see 
enclosure 2. A version of the 160A routine was written for the 
160 computer, see enclosure 1. It bypasses the interpolation 
option in order to operate in the smaller memory of the 160 computer. 

This system will produce multiple curved graphs, each curve 
is limited to a maximum of 900 points. Optional auto-scaling 
of data points, titling and curve labeling is available. Figure 
7 is a general flow diagram of the 1604 Grafplot routine. Copies 
of the coding for these routines are available from the CDC DATA 
CENTER, PALO ALTO, CALIFORNIA or from the U.S.N. Postgraduate 
School Computing Center. 

Two original techniques where developed which are of interest. 
They are the quantized scaling iterative procedure used in the 1604 
program and the "decision rule" algorithm for providing "best fit" 
motion commands to an incremental plotter. 

The scaling technique assumes a scale, tests for fit, then 
iterates to the next quantized scale and test again until the opti- 
mum available scale is found. 

The two point connector algorithm, "LINE", computes the 
code string required to move the pen of a digital incremental X,Y 
plotter from an initial point (Xl, Yl) to a terminai point ( X2, Y2 ) 
by the "best fit" approximation to the straight line between the 
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points. The permitted elemental pen movement is to an adjacent 
point in a plane Cartesian point lattice, diagonal moves are 
permitted. The approximation is “best fit" in the sense that the 
deviation of the generated line from the true stiaight line never 
exceeds one half an increment. This is physically the best fit 
possible within the movement constraints imposed. 

As an example of the LINE program, assume li is required to 
increment a pen's position with minimum deviation, along a 
straight line connecting point land point 2. The movement codes 


for the CalComp Plotter are as follows; 


6 4 3 
Z I 
10 8 9 


Executing the LINE program, the following values are found; 

A=95 

B= 3 

NRLONG = 5 

NRSHORT = 3 

MOSTLY = 1 

IBOTH = § 
and the iteration scheme produces the incremental rath shown. 

Note, in the following fortran program , LINE, a subroutine 

is required to output the movement codes from tne user's particular 
computer to the incremental plotter. Thus subroutine "PLOT ( MOVE )" 
would output the movement code "MOVE" to the plotter. For the 
CalComp Plotter the NCODE instructions may be deleted, since 
the routine is written to require no code conversion for this 


equipment. 
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PROGRAM LINE ( Xl, Yl, X2, Y2 ) 
DIMENSION NCODE (10 ) 


NCODE (1) = “user's +X movement code" 
NEIOIDE [= . -X u : 
NCODE (4) = i ash . . 
NCODESS.) c= " +X+Y ‘ 
NCODE (6) = 7. ~X+Y . . 
NGODE (8.)jc= ‘ -Y : Y 
NCODE (9) = " +X-Y i 
NCODE (10) = " =X<-Y : a 

A = X2 - Xl 

B= Y¥2 - Yl 


IF (A) 200,100,100 
100 ICODE=1 
Go To 300 
200 A=-A 
ICODE = 2 
300 IF (B) 500,400,400 
400 JCODE=4 
Go To 600 
500 B=-B 
JCODE = 8 
600 IF (A+B) 1500,1500,700 
700 IF (A-B) 800, 900,900 
800 MOSTLY = JCODE 
NRLONG =B 
NRSHORT =A 
Go To 1000 
900 MOSTLY = ICODE 
NRLONG =A 
NRSHORT = B 
1000 IBOTH = ICODE + JCODE 
LIMIT = NRLONG 
NSWITCH = NRSHORT 
MOSTLY = NCODE ( MOSTLY ) 
IBOTH = NCODE ( IBOTH ) 
1100 IF (NRLONG - NSWITCH - NSWITCH ) 1200,1400,1400 
1200 MOVE = IBOTH 
NSWITCH = NSWITCH - NRLONG + NRSHORT 
1300 CALL PLOT ( MOVE) 
LIMIT = LIMIT - 1 
IF ( LIMIT ) 1500,1500,1100 
1400 MOVE = MOSTLY 
NSWITCH = NSWITCH + NRSHORT 
Go To 1300 
1500 END 
END 
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4.2 Data Display "Line Printer Simulator" 


The "line printer simulator" program demonstrates a very 
effective method of providing a continuous page listing ability. 
The problem was to display one full page of data on the Data 
Display Incorporated, Model 65, console. The data displayed 
was to be updated one line at a time by over-writing an old 
line of data in the DD65's memory. It was desired that this 
new line entry always occur at the bottom of the page and all 
other lines would precess up the page and finally disappear. 
An effective method to provide this listing ability was programmed 
and added to the Fortran 60 System. An understanding of this 
program requires a familiarity with the word format used to up- 
date the DD65. The DD65 has the following characteristics; 


a. It has two keyboards which can be used only as output 
mediums to a computer. There is no connection or internal 

logic for providing tube display of a character when it's 
corresponding key is hit. This is different from a conventional 
typewriter, which prints it's character automatically when a 

key is hit. In order to display the character, it must be read 

by a computer, processed and the appropriate word format must 
be transmitted back to the display. The display logic then 
decodes the format of the words transmitted to its memory and 
displays the appropriate character/characters. There is no 
provision for read out from the DD65 memory by a computer. 

The memory serves only to store the data for display upon the 
cathode ray tubes. The logic cabinet of the display unit contains 
the circuitry required to scan its memory and display the contents 


onto the cathode ray tubes. 


Sf 


b To read from a display keyboard, requires that a sequence 

of external function codes ( see fig. # 9 ) must be executed to 
sense keyboard hit, select keyboard for input to the computer, 
then input one word via channel 7. The BCD code for the key 
read-in will be the lowest 6 bits for keyboard 1 characters and 
the lowest 9 bits if keyboard 2 was read. The process of reading 
the key into the computer releases the key at the DD65 console. 


c. Output to the display maybe either characters or vectors. 
There are three sizes of characters, 32, 64, or 128 per line. 
There are two sizes of vectors, 64 or 128 per line. The line 
mentioned is the width of the tube display area, approximately 


8.5 inches square. 


d. A selection of either character or vector mode, a memory 
storage address, the X / Y display position, and a tube selection 
are all data which is conveyed to the display. The word which 
contains this information is called a designator word, see figure 
# 8. This designator word can also carry two characters or 
vectors, depending on the mode selected. Additional characters 
or vectors can be transmitted after the designator word, if packed 
in a format called "string word format", see figure #8. These 
"string" word characters or vectors will be positioned relative 

to their preceding designator word. Thus it is the designator word 
that controls the tube location where the character/vector string 


wil! appear. For additional display information, see reference #19. 
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The line printer routine provides for displaying 32 lines 
of data. This requires that 32 designator words, each followed 
by a line of data, be stored in the DD65 memory. Once the 
data was in the DD65 memory, it was only necessary to selec- 
tively transmit new designator words with the appropriate new 
Y position indicators to move the whole line's position. Thus 
once the line data has been output, the 1604 is not required to 
retain an image of the page data in its memory, nor need any 
time be wasted in re-transmitting redundant information to the 
display. 

The technique employed required that a 32 word designator 
table be constructed. This table provided memory addresses 
for data storage from cells 600 thru cell 1777 in the DD65 memory. 
Note, the DD65 memory cells are only 24 bits long, the dis- 
assembly from the 1604 computer's 48 bit word format is automatic 
in the DD65 logic. Note also that equipment limitations dis- 
allow addressing odd numbered memory locations in the DD65. 
The designator table also provides 32 discrete, equally spaced 
vertical "Y" axis locations to provide seperation between the 
lines to be displayed. 

The method of up-dating the page displayed requires that 
all the "Y" locators in the designator words be incremented 
vertically one line space (20 units). A mask search is then 
executed to locate the designator word which contains the "Y" 
locator for the bottom line entry to the page. This "Y" locator 
is 400. Once found, the designator word is stored in the out- 
put buffer. Then the designator table is transmitted to the DD65, 
thus sweeping all lines vertically one space. The new line 
is packed into the output buffer. This buffer now contains a 
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designator word followed by a line of string words. These are now 
output via channel 7 to the display's memory. Note the channel 7 
input / output instructions transmit words, from the 1604 memory 
in reverse sequence compared to the normal buffer channels. 
This requires an inverse packing order when packina the buffer 
for output on channel 7. 

This line printer technique has also been incorporated into 
a typewriter page simulator for the right tube of the display. 
Both systems are working well. 

See appendix IV for the resident coding required for the 
line printer package. It required only 77 cells inciuding the 
designator table and a 10 cell output buffer. The desianator 


table is listed in the appendix IV, page # 6. 
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CHANNEL 7 OUTPUT FORMAT for DD65 DATA DISPLAY 


VECTOR DiRECTION TUBE COORDINATES 
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Select Code Computer Input Word 
FUNCTION 1604 160 Bit Format 
Select Keyboard 1 for Input 1e7ho 7140 OOOOOOFFFFFF 
Keyboard 2 for Input C7120 1120 OOOVVVFFFFFF 
Select Track Ball ''x'' C7102 T7102 OOOXXXXXXXXX 
Track Ball ''y"' C7104 7104 OOOYYYYYYYYY 
Select Range Switch C7110 7110 OOOOO00000RRR 


Select 160 Status Response  °(C7040O)  7olo 
Select Memory Update; 
from 1604 C7010 (7010) 
from 160 (C7020) 7020 


Select Radar Target Data; 


to 1604 C7002 = (7002) 
to 160 (C7004) 700% 
to Auxiliary Equip. C7001 TOOL 


Select Interrupt on}; 


Keyboard 1 Key Hit C7105 = (7105) 
Keyboard 2 Key Hit C7103 (7103) 
Radar Pulse Hit C7141 (72421) 
Release Interrupt Request C7111 = (7111) 


Remove All Interrupt Selects C7121 (7121) 


Notes 1. ''C'' Indicates 1604 data channel number. (Normally, C=7) 
=s=s=== 2. ( ) Indicates code disabled selectively on ''160 or 1604 
ONLY'' mode switch position. 


Figure 9a 
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SENSE CODES 
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1604 Full Exit 160 Status 

CONDITION Sense Code Response 
Keyboard 1 Hit C7172 X¥XKS 
Keyboard 2 Hit C7175 xx] 
Keyboard 1 NOT Hit C7173 
Keyboard 2 NOT Hit C7174 
Tab Hit XXX 
Tab NOT Hit C7157 
Carriage Return Hit xxx 
Carriage Return NOT Hit C7166 
Keyboard 1 Selected xxlie 
Keyboard 2 Selected UX 
Keyboard 1 NOT Selected C7167 
Keyboard 2 NOT Selected C7037 
NOT DD-65 Interrupt C7156 
DD-65 from 160 Selected C7020 2XKX 
DD-65 from 1604 Selected C7010 Lec 
Radar to 160 Selected C7004 xhscx 
Radar to 160k Selected C7002 KERXK 
Radar to Auxiliary Equipment 

NOT Selected C7001 x Lex 
Rader Target Present C7136 XKEK 
Rader Target NOT Present CTlo7 

Figure 9b 
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4.3 Merg Sort 


The SORT Routine, see appendix III, was written to improve 
the effeciency and reliability of sorting using the 1604 computer 
vice the IBM mechanical card sorter. Another motivation was to 
provide the capability of sorting 120 character records which 
could not be easily sorted using 80 character cards. 

The SORT Routine can sort on variable length column fields 
from 1 to 120 columns. The present routine divides the field to 
be sorted into 7 character fields, then multiple entries are made 
to a subroutine, SORT7, which actually performs the sorting 
operation. SORT7 divides the computer's memory into three 
equal bins, ABIN, BBIN, and CBIN. These are each 20,000 
octal cells long. SORT7 requires an input tape written in 120 
character records with an “End of File Mark" terminating the file 
to be sorted. Upon entry to SORT7, one of its subroutines, Alsinp, 
reads 1000 octal cards into ABIN. As each card is read, a sorting 
key is formed from the column field designated and this key is 
stored in the cell preceeding the input record image from which it 
was generated. The key occupies one cell, the record image 
occupies 17 octal cells, thus each input record requires 20 octal 
memory cells. Multiply 20 octal by 1000 octal to obtain the 
arbitrary 20,000 octal bin size which was choosen as the basic 
block size. Alsinp always checks for an E.O.F. mark and sets a 
flag to signal the rest of the routine that the last block has been 
read. After Alsinp has read 1000 octal records or encountered an 
E.O.F. mark, then an entry is made to a subroutine, Rlhmerg, 
which performs an internal merg sort by oscillating between ABIN 
and BBIN, sorting on the keys. The internal merg sort terminates 
with the sorted block in CBIN. If this was the first block, it is 
immediately written onto one of the two scratch tapes and Alsinp 
inputs another block. If this was not the first block, thena 


subroutine, Hexsort, is entered to perform a merg of the new block 
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into the file of previously sorted blocks which are accumulated 
externally on a scratch tape. This cycle continues until an 
E.O.F. is encountered, then after the external merg is complete, 
the scratch tape is rewound and a subroutine, Kremkey, reads 

in the ordered blocks from the scratch tape, removes the keys 
and writes out the output file in an ordered, 120 character record 
length file. 

If additional fields remain to be sorted, this output file is 
designated the input and another entry is made to SORT7 with 
the new character field's initial and last column numbers as 
arguments. This procedure continues until the total sort field 
is in order and listed on the output. The output is then re- 
wound to lockout and the operator is informed that the job is 
finished. 

Several improvements to this routine are suggested. 


a. Build and sort on a two cell key, if large fields are 
to be sorted frequently. This would provide a better balance 
between the internal sorting time and the external tape 


handling time. 


b. Provide for sorting on split fields, ie. non-consecutive 
column fields. This could be provided by forming 


the sort key piece-wise from specific columns. 


c. Use a double entry key / key location table for performing 
the internal sort. This would eliminate the necessity of carrying 
the input record image around with the key each time the key 
order is changed. The sort could be performed by ordering only 
the keys and maintaining correspondence in the key location 
table as the keys are sorted. This key location table could then 


be used to perform the internal ordering of the input record images. 
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This scheme would improve the internal sorting speed and 


reliability since it would require fewer internal data iransfers. 


ae The last and probably the most significant improvement 
which is indicated, would be to utilize two more scratch tapes. 
This would improve the sort routine speed by nearly 50%. This 
is due to the rewind time required by the tape drives and their 
inability to read in the reverse direction. At present, much 

time is wasted waiting on the two scratch tapes to rewind in 
order that the next internal block can be merged with the 
external ordered file. A suggested method to improve the 
external sort would be to alternate the merging of the internal 
block between to sets of scratch tapes similar to the set 
presently employed. This would increase the rewind time 
available for each set and thus decrease the idle time mentioned 
previously. After Hexsort has finished merging the last biock, 
then Kremkey would have to operate differently than at present. 
Kremkey would have to read one block from the ordered tape 

of each scratch tape set, then perform a final merg comparison 
similar to the Hexsort merg routine. Instead of forming an 
ordered list in memory, this final merg could be writter out 

as the final ordered, 120 character listable output. Before 

any other modification is considered, this last suggestion should 
be given priorty "one". At present it remains a gross deficiency 


against high speed sorting using this routine. 
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4.4 Satellite System Programming 


There are two basic operations necessary to establish an 


adequate satellite system. These are the ability to exchange 


data and to selectively execute a pre-stored program when 


directed by another member of the satellite system. The 


present installation proposed to couple the CDC 160 to the 
CDC 1604 Computer. The CDC 160 Computer does not provide an 


interrupt mode, therefore only the 1604 interrupt mode was 


available to be employed. 


The desirable characteristics of the basic 1604 satellite 


interrupt program are: 


a. 
be 
c. 
a. 


eo 


Reliability 

Flexibility 

Speed 

Effective Employment of the Communication Flags 


Minimize Memory Requirements 


‘The problems encountered in designing the basic 1604 


interrupt routine shall now be discussed. The 1604 Computer 


is unable to prevent the 160 Computer from entering the inter- 


rupt auxiliary routine which is wired into the 1604. For this 


reason, a protective "lock-out" scheme was required to prevent 


interference with the 1604 equipment handling routines. 


Specifically, there exists a critical time interval between 


equipment selection and activation during which an interrupt from 


a satellite station would be disastrous to the main program. 


The technigue develope to prevent this, is as follows: All 


1604 equipment handling routines were modified to turn on 


communication flag I (see ref. #2) in advance of any equip- 


ment selection. 


Communication flag I is then cleared after 


the selected equipment is activated. Using this scheme it is 
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then required that the 160 satellite compute: inspect communication 
flag I prior tc executing an interrupt. If flags lis sez, then the 

160 computer enters a “wait loop" until flac lis cleered by the 
1604 Computer. Thus through the use of ccmmunication fiag IT, 

the 1604 cornputer is,in effect, capabie of "locking out" the 

160 satellite computer from an interrupt recus:* Tnis was a 


desirable feature rot presently provided in the hardware design. 


The next problem in the design of the interrupt ircutine was 
how to indicate to the 1604 computer, the natsre cf the task 
requested by the 160 computer. The method used requizes that 
each interrupt shall immediaty trigger 5 , 48 hit word , data 
transfer to the 1604. The format of this wovd, cesianated ag 
the "control werd", is outlined in detail in tianure #12. After 
receiving this “control word" the 1604 interprets ine operation 
to be performed. There are four tasks whicn car. be directed by 
the control word, they are: 

1. 1604 INPUT DATA BLOCK 
. 1604 OUTPUT DATA BLOCK 


PACK ARGUMENT ADDRESSES INTO A SUBROUTINE 
AND THEN EXECUTE THAT SUBROUTINE. 


4. LOAD "A" REGISTER WITH A 2! BIT ARGUMENT 
FROM THE CONTROL WORD AND THIN RETURN 
WIMP TO EXECUTE THE SUBROUTINE. 


A flow diagram of this 1604 satellite interrupt routine is provided 


tO 


Go 


tnaeticure + 1. 


One additional problem remains to be discussed, that is 
storage allocation for the programming required by the satellite 
system. This was acquired by setting the resident Lias level 


on the Fortran 60 System to 5000 octal, vice the nermai 4000. 
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I60-1604 SATELLITE 
CONTROL WORD FORMAT 


DATA TRANSFER MODE 
INTERRUPT WITH COMM FLAG IX "NOT" SET 


| - 3 4 “+ 160 Word Nr. 
mV, W 
LLL INITIAL ADDR, WLLLLLL TERMINAL ADDR. 
8 BITS I5 BITS 9 BITS |! I5 BITS 
BIT=O For 1604 OUTPUT 
BIT= | For 1604 INPUT 
SUBROUTINE JUMP MODE 
INTERRUPT WITH COMM FLAG Ir "SET" 
TYPE I, ARGUMENT IN "A" REGISTER, RTJ To SUBROUTINE 
4 1% 21 BIT, INTEGER ARGUMENT V7Z SUBROUTINE 
WA _SIGN BIT WILL BE EXTENDED ‘A ADDRESS 
21 BITS 9 BITS (5 BITS 


.TYPE I, PACK ARGUMENT ADDRESS, RTJ. To SUBROUTINE 


Y ADDRESS 44 ADDRESS 


2° 6 BITS 15 BITS 9 BITS IS BITS 
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FIGURE -]9 


This provided the memory space needed to store the satellite 
programming plus an additional "buffer" area for receiving 
transient subroutines from the 160 computer. These subroutines 
may the be executed by an interrupt entry to the 1604 computer 
via the satellite interrupt system. 


The use of the 160 as a satellite station requires that 
the modified library tape, FORTSAT, be in use by the 1604 
computer. Also, the 1604 must be operating under monitor 
control in order to utilize a remote monitor process routine 
which was developed by the authors' ( see ref. #22). The 
physical seperation of the satellite 160 computer station required 
some means of sensing the above conditions at the remote 
station. Visual indicators were selected as the best method 
of implementing the required status sensors. The console 
of the 160 Computer contains many unused indicator lights, 
two ot these were selected to be used as status indicators. 
The first light, designated #1 or FORTSAT, is a blue-green 
background field light at the left end of the "P" register. The 
second light, designated # 2 or MONITOR, is the next blue- 
green background field light to the right of the #1 light. 


Manual control of these lights at the console of the 1604, 
was considered an unnecessary burden to the operator. Computer 
selection would be more convenient and the status indications 
more current in the reflection of the actual status of the 1604 


Computer operations. 


fi 


To enable computer control of the indicator lights, two new 
select codes ( on - off pairs ) for the 1604 were required. As 
all ‘satellite selects are made in the 1607 Magentic Tape Logic 
Cabinets, modification of these wnits was necessary. This 
modification would allow the 1607 to accept and decode the new 
indicator light codes. The two codes selected were; 

LIGHT #1 (FORTSAT ) "ON" 935]1 


YOrE. 6351) 
LIGHT #2 (MONITOR) “ON" 53544 
"OFF" 632544 
The select code format is as follows: 
First digit; Channel number 
Second digit; Cabinet number 
Third digit; Group code, 5 for satellite 
Fourth & Fifth; Condition code 


The two codes selected for the indicator lights contain the 
false cabinet number 3. This was necessary because the 
1607 ( cabinet # 2 ) does not uniquely decode the last two 
digits of any select code. Therefore, to prevent interference 


with any of the existing codes, a false 3 was used. 


To avoid the need for manual selection of "program control" 
mode of operation for the 1607 Tape Cabinets when enabling the 
satellite station, this selection was wired to be controlled by 
light #1 and the master clear switch. Initial turn on cf light #1 
selects "program control" and the Master Clear disables both 
lights and removes the program control selection. The logic 
diagrams for the modificiations made to the 1607 Tape Cabinets 
are shown by figure #13. Two relays were added to the 160 


to provide switching of the two lights provided. 
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APPENDIX I 
LIBEDIT PROCEDURE 


There are two publications available to assist a user 
of COOP MONITOR in performing a successful library 
preparation or modification. These are ref.17 and 10. The 
following was obtained from these two sources together with 
additional remarks by the authors to aid in the understanding 


of the procedure. 


A. Library Tape Format 

The library tape is composed of two files. The first file 
contains three records in absolute binary format. These are: 
a. Bootstrap routine ( BOOT ) 
b. Recovery routine ( EXTREC ) 
c. Master Control routine ( MCS ) 


The second file contains the subroutine library and starts 
with the "directory". This is followed by the library subroutines 
each consisting of one record (the system can accept subroutines 
with more than one record but the present library has none ) 
composed of contiguous relocatable binary card images. Each 
subroutine is identified and defined in the directory by 
the following. 

A subroutine name 

Number of records in the subroutine ( normally 1 ) 
Number of common blocks assigned 

Names of those common blocks 

Length of each common block 

Range of the subroutine (FWA and LWA+#1 ) 
Number of entry points to the subroutine 

Entry point names 

Number of external symbols referenced 


External symbol names 
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The order in which the subroutines are identified in the 
directory must be the same as the order of appearance of the 
subroutines in the file. The identifying name, each entry point 
name, each external symbol and each common block name must 
have the following properties: 

a. Eight BCD characters in length, no imbedded blanks 
b. Leading character not digital or blank, except common block 

The first library subroutine defined in the directory is the 
Master Control System called "Resident". The length of 
Resident and all named entry points are defined. External 
references are not made within the resident program. There are 
no entries in the directory for the subroutine EXTREC. 

The recommended layout of the library subroutine file is: 


Directory (this must_be first ) 


I/O drivers for standard medium 

All other I/O drivers 

Secondary Control Systems (SCS) 

Any other subroutines 

SNAP ( selective dump routine ) 

. MAP ( produces a memory map of loaded programs ) 
» Systems such as FORTRAN, CODAP1, ALGOL, etc. 


This layout facilitates one pass loading of library subroutines. 


onN Dm oO BP WW DN KH 


The sequence for loading library subroutines will be: 
1. I/O drivers for the standard mediums. 
2. I/O drivers for the current job. 


3. The desired secondary control system. 


B. Directory Format 


The directory is a set of 8 different types of cards for each 
subroutine in file 2 of the library tape. These must be ordered 


in the directory deck in the same sequence as the routines appear 
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in file 2. Care must be exercised to assure the directory 
reflects the exact composition of the subroutine file, otherwise 
errors will result. Each set of directory cards must contain: 
1. A card with the subroutine name, left-justitied, in 
columns 1-8. 

2. A card with a 16 digit octal integer, left-justified, in 


columns 1-16. This has the format: 
OOOKKKKKOOORRRRR 

where 000 is zero 

KKKKK is the number of common blocks required 

by the subroutine 
RRRRR is the number of records the subroutine 
occupies on the library tape ( usually 1) 

3. If KKKKK is not zero, there must be a number of cards 
equal to KKKKK containing the name of each common block. 
The name is punched, left-justified, in columns 1-8. The 
card may be blank if no name for the common block is given. 
4. If KKKKK is not zero, there must be a number of cards 
required to define the lengths of the common blocks. These 
cards contain octal integers separated by commas. The integers 
specify the length of the common blocks named by the cards 
in #3 and the lengths must be in the same sequence as the 
names. Any number of integers, more than zero may appear 
on a single card. The last integer on the card must be 
followed by a blank. The number of cards required depends 
on the number of common blocks and the packing of lengths. 
5. A card with a 16 digit octal integer, left-justified, in 


columns 1-16. This has the format: 
PPPFFFFFXXXLLLLL 
where PPP is the number of entry points to the sub- 
routine (must not be zero) 
ERFFF is the relative first word address of the sub- 
routine ( FWA) 
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XXX is the number of external symbols referenced 
by the subroutine 
PEEEL is the relative last word address plus 1 
of the subroutine ( LWA+1 ) 
6. The number of cards equal to PPP, each containing an 
entry point name, left-justified, in columns 1-8. There must 
be at least one such name. 
7. The number of cards required to define the entry point 


addresses. These cards contain octal integers of 1 to 5 


digits separated by commas. The integers specify the 
relative address of the entry points named on the cards in 6. 
The entry point addresses must be in the same sequence as 
their corresponding entry point names. 
8. The number of cards equal to XXX in 5. If this is greater 
than zero, each card just contains the external symbol name, 
left-justified, in columns 1-8. These external symbol names 
must be in the same order as they were defined during the 
assembly or compilation of the subroutine. 

The sets of directory cards are preceded by a card with 
"DIRECTRY" punched in columns 1-8 and followed by a card 
with "7777777777777777" punched in columns 1-16. 


C. Edit Input 


The input data for editing a library tape is composed of control 
cards, directory cards, and program information. The program 
information is in the form of relocatable binary cards and this 
binary format must be thoroughly understood by the user to 
perform a successful LIBEDIT. Appendix III of ref.10 gives 
a complete description of this binary card format. 

The input data must be on the standard input unit along 
with the required MCS control information ( "begin job" and 


"mcs" cards). The next card of the edit input deck must 
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LIBEDIT INPUT DECK 


END MONITOR INPUT 
END OF FILE 


END Card 


Last Subroutine in File 2 


Second Subroutine in File 2 


First Subroutine in File 2 


Tali ala a OAR 


Directory Deck 


DIRECTRY Card 


File 1 Records (If Required ) 
START Card 
MCS Control Card 


BEGIN JOB XXX Card 


Figure A.2 Edit Input Deck 
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be a START card. This card contains the word "START" in 
columns 10-14 to produce a library tape of the same format 
as the old, see ref.17 for other formats possible. The 
succeeding cards in the input deck are determined by the type 
of edit and the file of the library affected. 


D. File 1 Edit 


The information in file 1 is in absolute binary format, and 
the file is divided into three records. Each record must be 
added, replaced or deleted as an entity. The information to 
be added or replaced must have been prepared by CODAP1 
using the ORG pseudo instruction and it must be a complete, 
absolute binary format program. The complete deck produced by 
CODAP1 is included (only the "begin job" card need be removed) . 

The edit input is composed of decks of absolute binary 
records, each preceded by a control card. This card contains 
a decimal integer in column 10, followed by a blank, R, or D. 
The integer specifies the record position within file 1 of the 
binary card images which follow. The blank specifies the record 
is to be added, R to replace, and D to delete. The decks 
composing the records must appear in the same order in which 
they will appear on the new library tape. 

If any of the entry points in MCS are altered by this edit 
then the complete directory ( with the new MCS eniry point 
addresses ) must be included in the edit input. 

The Extended Recovery routine ( EXTREC ) uses the AET and 
flags contained in BOOT as absolute address locations. If 
these locations are changed, then they must be changed within 
EXTREC ( by recompiling ) and including the new EXTREC deck, 
between BOOT and MCS, in the file 1 edit. 
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EY Pte. 2. Edit 


The information in file 2 is in several records in 
relocatable binary format. The first record is the directory. 
A new version of the directory need not be included in the 
edit input deck when the changes to file 2 are replacements 
which do not affect record lengths or entry points. In all 
other cases the complete directory must be included. 

The first record of each subroutine (normally there is only 
one record ) must be composed of relocatable binary card 
images produced by CODAP1. For edits involving subroutines 
of more than one record see ref.17. Each record must be 
preceded by a.control card containing the subroutine name, 
left-justified, in columns 1-8, a blank in column 9, anda 
decimal integer starting in column 10 followed by a blank, R, 
or D. This integer specifies the position of this record 
within the records of this subroutine (usually 1). The blank 
specifies that the record is to be added; R specifies it is to 
replace an existing one, D specifies it is to be deleted. If 
a D appears, a binary deck for that record must not appear 
in the edit deck. 

The edit deck, see figure A.2, must be terminated by a 
card with the word END in columns 10-12. To finish the 
input job an "END OF FILE" and a "END MONITOR INPUT" 


are necessary. 


F. Operation 


The library edit program is called from the library as the 
Secondary Control System by a MCScontrol card. The edit 
input is read from the standard input unit; a new library tape 


is written on the logical unit #13; operating information is 
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written on the standard output unit and the comment to 
operator unit. 

For an edit operation the MCS control record ( card ) 
might appear: 7 
gELT, MGH, 34000,0/13,5,1000. 

During operation of the program, a listing is produced 
on the standard output unit. This listing contains each 
control card as it appears in the edit deck, ail directory 
cards, and a message PREV REC X for each record transferred 
from the existing library to the new tape. The completion 
of the operation is indicated by the message EDIT COMPLETED. 
A sample edit listing is shown is figure A.l. Error 
diagnostics are written on the standard output unit and the 
comment to operator medium as errors are detected. These 


diagnostics are explained in table l. 
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START MONITOR RUN. 
BEGIN JOB 234 


ELT, 2227 @7ale. 5., 1000. 


PREV. 


START 
1R 
2 

3R 
DIRECTRY 
RESIDENT 
0000000000000000 
0430007700014557 
READ* 
WRITE* 
SELECT * 


1205 
1212 
age 


TYPEI/O 
0000000000000000 
0010000000300277 
TYPEI/O 

0 

CBE 

CEBrZ> 

SELECT* 
CARDREAD 
0000000000000001 
0010000000200466 


WRITE* 
LOADER* 
7777777777777777 


PREV ee ® 


CARDREAD I1R 


] 


PREV. PTI 1 
PREV, PTLOG 1 
PREV. BFT 1 
PREV. MAP 1 


PREV. LIBEDIT 
PREV. C@OEY* 
EDIT COMPLETED 
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Figure A.l 
Sample Edit Listing 


TABLE 1 LIBRARY EDIT ERROR DIAGNOSTICS 


CKSUM ERROR XXXXXXXX LTN-50 

An input column binary card checksum detected to be in 
error. XXXXXXXX will be the record number if the error is 
detected during a file 1 edit; or it will be the name of the 


subroutine if the error is detected during a file 2 edit. 


DIRECTRY ERROR 


An error has occurred in the directory. 


DIROFLO ERROR XXXXXXXKX 
One of the eight directory tables requires more than 1/8 
of available core. XXXXXXXX will be the name of the routine. 


EDITINP ERROR XXXXXXXX 
The order of the attempted edit is incorrect or incompatible 
with the directory. XXXXXXXX will be the name of the routine. 


END OF TAPE 
An end of tape mark is encountered during writing of 


the new library tape. 


EPT ERROR 
Two routines in the directory have the same entry point 


names. 


OFLCORE ERROR XXXXXXXX 

Available core is not large enough to allow forming a 
record. XXXXXXXX will be the record number if the error 
occurs during a file 1 edit; or it will be the name of the 


routine if the error occurs during a file 2 edit. 


RANGE ERROR XXXXXXXX 
An inconsistency exists between the IDC and RBD cards 
of a file 2 binary deck. XXXXXXXX will be the name of 


the routine. 
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READING ERROR XXXXXXXX LIN-YY 

A. A persistent (not cleared after three tries ) parity 
error or illegal BCD character is encountered when reading 
the library tape or the standard input unit. 

B. An illegal or impossible number is detected on an 
edit control card. XXXXXXXX will be the record number if 
the error is detected during a file 1 edit; or it will be the 
name of the routine if the error is detected during a file 
2 edit. 

YY will be the number of the logical unit number on 
which the error was detected. 00 for the library or 50 


for the standard input unit. 


WRITING ERROR XXXXXXXX LIN-13 

A persistent (not cleared after three tries ) parity error 
is encountered when writing the new library tape. XXXXXKXXX 
will be the number of the record if the error is detected 
during a file 1 edit; or it will be the name of the routine 


if the. error is detected during a file 2 edit. 
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ENCLOSURES. 


ENCLOSURE 1 


A. IDENTIFICATION 
TITLE: 160 Grafplot Routine 
PROGRAMMERS: R.L. HOGG / D.C. GLOVER 
ORGANIZATION: U.S. Naval Postgraduate School 
Monterey, California 
DATE: 1 April 1963 


B. PURPOSE 
To plot multiple curved graphs on the CalComp 165 plotter. 
Graph titling and axes annotation are provided. The input 
to the routine is a specially prepared magnetic tape, see 
the CDC 160-A program of the same name for the input tape 
format. This routine is a truncated version of the 160-A 
program, interpolation has been deleted in order to operate 


in the reduced memory of the 160 computer. 


C. USAGE 
1. Normal Operation 
a. Load the specially prepared magnetic tape input 
(See 160-A write-up) on unit #1. Select unit 
for Binary parity. 
Load bi-octal grafplot program at address 0000. 
Position the plotter pen at position where the 


lower left corner of the graph is to be plotted. 


d. Starting Addresses 


Location Contents of "A" 
0000 # of graphs to 
be plotted 

0001 

0002 

0003 

0004 

0010 

0040 Graph #inA 


e. Optional Running Modes 


Results 


Reads tape and plots 

# of graphs called for. 
If A=0, all graphs will 
be processed. 


Skip to next graph. 


Backspace to beginning 
of current graph. 


Back-up one graph. 
Same as a 0000 start. 
Rewind tape to Load Pt. 


Skips forward N-1 graphs, 
into position to plot 
graph #N. 


Four modes of operation are provided. To select the mode 


desired, execute a start at cell 0020 with the following 


"A" register arguments set. This primes the routine for 


the mode selected. Remaining graphs will be plotted in 


this mode, operations as previously described. 


"A" REGISTER FORMAT for MODE SELECTION 


bypass 


__ Stop after 
each curve 
__.Bypass 
Titling 


—_By pass 
Axes Labeling 


Axes & Labeling 


NOTE: Entry of any non-zero octal number, 


constitutes setting an argument. 


Normal Stops 
Location Situation 


0004 Normal halt after operation 
is completed 


ebay Optional halt after each curve. 
Run to continue. 


Error Stops 


0130 *Parity - Title location data 
OESS _ 

0173 *Parity - Title character 
0200 “7 

O373 *Parity - Axed data 

0400 cli 

1125 *Parity - Curve data 

1163 ae 


* Re-Select Start to continue questionable plot. 


** Unable to Continue / Skip to next graph to proceed. 


Cc. 


IDENTIFICATION 


TITLE: 


DATA CENTERS IDENT: *BOO1. 


ENCLOSURE 2 DATA CENIERS IDENT: 


160-A Graph Plot Program 


PROGRAMMERS: Maurice D. Weir, Milton Spritzer, D. W. McIlhenny, 


Harry Farnsworth 


ORGANIZATION: Fleet Numerical Weather Facility, Monterey, California 


DATE: 


REVISED: 


PURPOSE 


15 August 1962 


4 February 1963, by R. Hogg and D. Glover 


To plot N curves on the CONTROL DATA 165 Plotter, complete with titling 
information and annotated axes, from a specially prepared magnetic tape. 
SEE TAPE FORMAT. 


USAGE 


1. Computer Operational Procedure 


a. 


Normal operation: 


1) Specially prepared magnetic tape on Unit #1. (SEE TAPE FORMAT) ' 
2) Load bi-octal tape at location 0, bank 0. Set direct bank 
equal to zero. 


3) ‘Position the plotter pen such that the cross-hairs line up in 
the following INITIAL POSITION: LEFT most VERTICAL LINE and one 
of the HALF-INCH HORIZONTAL LINES on the graph paper. 


CAUTION: User should indicate this POSITION in relation to a 
previously plotted graph. This prevents the forth- 
' coming graph from being written over a previously 
plotted one. 


4) Starting Address 


Location Contents of A Result 
0000 . No. of graphs Reads tape and plots number of 


to be plotted. graphs called for. If A#=0, 
tape will be completely processed. 


5) 


6) 


7) 


8) 


Location Contents of A Result 
0001 Skip to next file. 


0002 Backspace to beginning of 
current graph. 


0003 Back up one complete graph. 
0010 Rewind tape to load point. 
0040 Graph No. N Skip N-l graphs, and stop 


NOTE: Normal halt for above operations is location 4. 


Plotter pen will position itgé1§, draw and annotate the 
horizontal and vertical axes. Pen will finish by driving 


back such that the cross-hairs are now lined up with the 
INTERSECTION of the HORIZONTAL and VERTICAL AXES just drawn. 


Plotter will plot N curves with their identification (if any). 
Pen will finish by driving back to the INTERSECTION of the 
HORIZONTAL and VERTICAL AXES. 


Normal Stop 


(P) = 0004 - Normal halt for all options. 


Error Stops 


‘a) The following error stops, which occur during the read from 
the magnetic tape, have two options. These options are: 


i) RUN for questionaibe plot, or 


ii) SET selective jump switch #2 and RUN. This will result 
in by-passing that particular section of the program 
(e.g., titling, annotation of axes, or curve). 

The error stops are: 

P = 0135 - Parity error in title locations 

P = 0176 -- Parity error in titling data 

P = 0401 - Parity error in axes data 

P = 1144 - Parity error in curve data 


b. 


b) The following error stops, which occur during the read from 
the magnetic tape, have no options. If any occur, operator 
should check to make certain magnetic tape unit is on unit 
#1, tape is at load point, tape is ready, 163-2 units are on. 
Then set (P) according to step 4). 


The error stops in this category are: 
P = 0142 - titling location 

P = 0203 - titling data 

P = 0406 - Axes data 

P = 1200 - curve data 


if 


© = 1103 - error in number of interpolations. RUN. 


Operational variations: 


The Graph Plot program contains some special operational procedures 
which allow for variations in the graph by altering the Normal 


operation. 


1) 


2) 


3) 


Option to by-pass titling: 


After the plotter pen has been positioned in the previously 
defined INITIAL POSITION, SET selective jump switch #2. Set 
(P) according to step a.4) and RUN, Titles will be read from 
magnetic tape but not plotted. Program will make NORMAL STOP 
P = 0361, and pen will not have moved. 


Option to by-pass axes annotation: 


With plotter pen at AXES INTERSECTION and at SPECIAL STOP 

P = 0361, SET selective jump switch #2 and RUN (do not clear). 
Axes data will be read from magnetic tape but not plotted. 
Program will make NORMAL STOP P = 1051, and pen will not have 
moved. 


Option to PLOT - one-curve-STOP: 


With plotter pen at AXES INTERSECTION and at SPECIAL STOP 

P = 1051, SET selective stop switch #1 and RUN. After curve 

is plotted, pen will drive back to AXES INTERSECTION, and program 
will make SPECIAL STOP P = 1174 before the next curve record is 
read in. Pen-ink may now be changed for next curve, etc. RUN 

to read in and plot next curve. 


4) Option to by-pass one curve at a time: 
Hal 

, SET selective switch #2 

and RUN. Curve data will be read in, and/program will make 
SPECIAL STOP P = If selective jump switch # 2 remains 
set when RUN is set, next curve will be read in, and program 
will again make SPECIAL STOP P = . Lf selective jump 
switch # 2 is not set when RUN is set, next curve will be 
read in and plotted, etc. 


At SPECIAL STOP P s& 105 


2. Space Requirements 


a. Program: 0 - 4137 in Bank zero. 


\ 


b. Curve data and interpolation: 100 - 7777 in Bank one, 


3. Temporary Storage 


Locations 50 - 77 in Bank zero. 


4, Tape Mountings 


co 


Magnetic tape must be read from unit # 1. 
5. Caution to Users 


Do not step through program. Read write-up carefully before using 
the Graph Plot Program. 


D. . TAPE FORMAT , 
Each magnetic tape to be used by this program must have one or more 
records (as indicated) in each of the following categories: 


I Titling data - multiple records 
II Axes data - one record 
III Curve data - multiple records 


IV End of File. 


These records must be on the magnetic tape in the order defined above and in 
the format to be specified below. 


AXES DEFINED AS FOLLOWS: 


+J 


I = horizontal axis 


J = vertical axis 


~ 4a e- 


I Titling data 


1. Record 0 
a. 12 bit binary mode 


b. 4 160-A words (i.e., 1 1604 word) 
c. Format; 


word O I distance of initial pt. of first title 
(I) from the INITIAL POSITION, given as 
a signed A I movement in inches times 


100... 


word 1 J distance of initial pt. of first title 
(J) from the INITIAL POSITION, given as a 
signed & J movement in inches times 
100 ,- 


word 2 Orientation of titles defined as follows: 


0004 2 FNWE 


0001 


.PNWE 


0002 IMN4 


0003 


4IMNI° 


word 3 Number of lines in title given as a 12 
bit integer. COCTAL) 


» 2. Records 1 to T 


a. BCD characters in 6-bit binary mode. 


Rican 


b. Maximum length of 120, characters where 119, is number 
of characters to be ae teed: 


c. Format: Z 


character 0 Size of letters in title line. Size X is 
defined to be "X times one-tenth inch". 
The width of a letter is approximately 
equal to its height. 


- 5- 


character 1 Title line in BCD. Not necessary to 
: fill out this line 


chaahiter 119 
II Axes data 
a. 1 record in 12 bit binary mode 
b. 20, 160-A: words 
c. Format: 
"th? T distance of initial point of horizontal axis 


from the INITIAL POSITION, given as a signed 
ZI movement in inches times 100. 


word 1 J distance of initial point of horizontal axis 
(J) from the INITIAL POSITION, given as a signed 
AJ movement in inches times 100,. 
word 2 Length of the horizontal axis given as a signed 
(L,) ALI movement from where the axis begins in inches 
times 100.. 
d 
word 3 I distance of initial point of first horizontal axis 
(1 label from the INITIAL POSITION, given as a 
signed AI movement in inches times 100... 
word 4 J distance of initial point of first horizontal 
“ad (a? axis label from the INITIAL POSITION, given as 
a signed AJ movement in inches times 100... 
word 5 I distance between horizontal labels, given 
( In as a signed AI movement in inches times 100.,. 
word 6 First value which is to be plotted for the hori- 
(ve) zontal axis labeling. This is a signed 12 bit 


integer which will be converted to BCD. Its 
maximum value cannot exceed +999 4 


word 7 Value of the AI distance between horizontal 

( vs) axis labels given as a signed 12 bit integer. 
word 8 Number of horizontal axis labels to be plotted. 
~ OD) This is always a positive 12 bit integer. 


III Curve data 


be 


Cc. 


word 10. 


(1y) 
word 11 
(J,,) 


word 12 
(L,) 
word 13 
(I) 
word 14 
(3) 
word 15 
Ca) 
word 16 
v,) 
word 17 
( YY? 


word 18 
(v,) 


Upper six bits: 


axis labeling. 


Lower six bits: 


labels. 


Size of letters in horizontal 


Orientation of horizontal axis 
Orientation previously defined. 


I distance of initial point of vertical axis from 
the INITIAL POSITION, given as a signed AI 
movement in inches times 100.. 


Vertical axis analogy to 


Vertical axis 


Vertical axis 


Vertical axis 


Vertical axis 


Vertical axis 


Vertical axis 


Vertical axis 


Upper six bits; 


axis labeling. 


Lower six bits: 


labels. 


analogy 


analogy 


analogy 


analogy 


analogy 


analogy 


to 


to 


to 


to 


to 


ua 
analogy to 


Multiple records in 12 bit binary mode. 


Size of letters in vertical 


m words long where m has maximum value of 3677 


d 


word l. 


word 2, 


word 3, 


word 4 


word 5 


word 6. 


word 7. 


word 8, 


Orientation of vertical axis 


3° 


Each I, J must be given as a distance from the INITIAL POSITION, 


as a signed QI,4J movement in inches times 100 


-<j]- 


qd 


word 0 
word 1 
word 2 
word 3 
word 4 
word 5 
word 6 

7 


word m-5 
word m-4 
word m-3 
word m-2 
word m-l 


IV End of File 


E. TIMING 


0000 
0000 
0000 


number of interpolations (00 - 07) 


3777 
3777 


end flag 
end flag 


curve name. 


4 BCD characters, 

packed two to a word. 
upper six bits: letter size of curve name 
lower six bits: orientation of curve name 


Each graph takes 2 - 3 minutes to plot, including titling, annotated axes, 
and interpolation. 2 | 


F. METHOD 
~ 1. General 


Zt 


All location points on the graph are interpreted as being relative 
to the (0, 0) INITIAL POSITION previously defined. All lengths, 
intervals, etc. must have the appropriate sign according to the 
definition of the(I, J) axes. Information is plotted as follows: 


titles, horizontal axis, horizontal axis annotation, vertical axis, 
vertical axis annotation, and finally the curve(s) (with interpo- 
The program uses TAP for reading the magnetic 
tape input, OVDR for driving to a position with the pen up, LINE 
for joining given points with the pen down, and LABEL for titling. 


lations, if any). 


Titles 


The initial points from the magnetic tape input are used to position 


“the pen in the desired location on the graph for the first title. 


The 


3. 


first title is plotted, and if there are additional titles, the program 
calculates the appropriate spacing between lines according to the % 
orientation and the letter size of the incoming title. The program ; 
keeps track of all pen movements so that when the last title is 
plotted, pen drives back to the (0, 0) INITIAL POSITION. 


Annotation of Axes 


The initial points from the magnetic tape input are used to position 
the pen in the desired location on the graph for the start of the 
horizontal axis. The axis is drawn, and then the pen moves into 
position to begin the first horizontal axis label. This first label 
is plotted according to its size and orientation; the remaining labels 
being computed and then plotted at the desired intervals, based 

upon the initial value, the scaling, and the number of labels de- 
sired. At the completion of the horizontal axis annotation, the pen 
positions itself at the start of the vertical axis. The axis is drawn 


and labelled as in the horizontal axis annotation. The program 


keeps track of all pen movements so that when the vertical axis 
annotation has been completed, pen drives back to the INTERSECTION 
of the HORIZONTAL and VERTICAL AXES. 


Interpolrition 


This is a four-point interpolation method based on the Bessel In- 
terpolation Equations. 


unit 
interval 


The interpolation scheme fits the four points to a quadratic curve, 
computing the interpolated point Je by the following equation: 


Spe dy tPF Gyo J) + Ee ay — Gietisaue Jxakl) 


The program uses F = 1/2. 


This interpolation method depends upon equal I intervals. Since 

it cannot perform an interpolation between the first and last pairs 
of J values, a linear interpolation is performed at these two posi- 
tions (marked "'L” in the diagram). This linear interpolation oc- 
curs at the half-interval of both end pairs, which allows the user 
to make more than one interpolation by maintaining equality of I 
intervals. 


The number of interpolations X desired must comply with the follow- 
ing inequality: i 
AI 


ee > = 
6 foo 


mw 


The program has set the maximum number of interpolations as 07, 

If the number of interpolations indicated (see TAPE FORMAT, "curve 
data") exceeds this maximum, program will interpolate 07 times 
only, and indicate an error in the number of interpolations indicated. 


Caution: Because of the necessary storage space for the curve data 
points, the maximum number of (I, J) points that can be plotted 
after interpolation is 980. 


WARNING: Since the interpolation depends upon equal spacing of 
the I intervals, any curve which does not have equally spaced points 
will not be properly interpolated. This applies to multiple-valued 
functions and asymptotic values. | 


Curves 


The' first ( I, J ) curve data point from the magnetic tape input is 
used to position the pen in the desired location on the graph for 
the start of the curve plot. Curve is then plotted by joining suc- 
cessive points by a straight line. At the completion of plotting 
the curve (with the desired number of interpolations, if any), 
program labels curve (if desired) with indicated orientation and 
letter size. Program keeps track of all pen movements so that 
when the curve labelling is completed, pen drives back to the 
INTERSECTION of the HORIZONTAL and VERTICAL AXES. If another 

curve is to be plotted, program proceeds in the same manner as 

for the first curve. When the final curve is plotted, pen will be 
positioned at the INTERSECTION of the HORIZONTAL and VERTICAL 

’ AXES, 


Caution: User may not desire a curve label, in which case blanks 
are indicated on the magnetic tape for the four BCD characters. 


- 10 - 


(see TAPE FORMAT, “curve data.") evfrtheless, an orientation 
and letter size must still be indicated since they are required. 
by the LABEL subroutine. 


FINIS 


fine 


EXCLOSURE 3 ’ DATA CENTERS IDENT: *A002. 


A. IDENTIFICATION 


’ TITLE: 1604 Graph Plotting Subroutine 
DATA CENTERS IDENT: *A002. 
PROGRAMMERS: R. L. Hogg and D. C. Glover 
ORGANIZATION: Naval Postgraduate School, Monterey, California 
DESCRIPTION WRITE-UP: E. A. Campbell, CDC 
DATE: 5 March 1963 


B. PURPOSE 


To write data on a magnetic tape for off-line plotting on the CONTROL DATA 
165 plotter. The tape format is compatible with the 160-A Graph Plot 
Program (Data Centers Ident *B001.) which is used to drive the 165 plotter. 


C. USAGE 
1. Calling Sequence 


a. FORTRAN-62 | 
CALL GRAFPLOT(MODCURV, NUMPTS, X, Y, LABEL, INTERPS, SFX, SFY, IXOFFS, IYOFFS, 
| IWIDE, IHIGH, MODE, TITLESIZ, TITLE1, TITLE2, -----+, TITLEN) 
{ 


CALL AUTOGRAF (MODCURV, NUMPTS, X, Y, TITLE1, TITLE2, ----:>, | 


TITLEN) 
~b. CODAP1 
\ “a 
Either: ENA (MODCURV) Pn 
ENQ (NUMPTS ) 
RTJ GRAFPLOT an 
+ ZRO X 


ZRO x4 
ZRO LABEL 
ZRO INTERPS 
ZRO SFX 
_ . ZRO SFY 
- ZRO IXOFFS 
ZRO IYOFFS 


ZRO IWIDE 
ZRO IHIGH 
-~  ZRO MODE 


ZRO TITLES IZ 
ZRO TITLE] 
ZRO TITLE2 


ZRO TITLEN 


_—-—. a 7 .. nen. «a. 


a 


Parameter Name 


*MODCURV 


LABEL 


INTERPS 


SFX 


SFY 


IXOFFS 
TYOFFS 


IWIDE 
IHIGH 


Input Parameters 


(MODCURV) 
(NUMPTS) 
AUTOGRAF 


Fl. Pt. 
Number 
0 
Bl. Pts 
Number 
1-10 
0 
1-10 
0 
1-10 
1-120 


Description 


First and last curve for this graph 
First curve of many 

Intermediate curve 

Final curve for this graph 

Number of points 

Location of X coordinates 

Location of Y coordinates 


BCD label for curve 

No label 

Automatic sequencing of curves for 
No. 1-8. 

No interpolation between coordinate 
points 

One to 7 interpolations between 
coordinate points 

Program will find best scale factor 


Scale factor for xX ** 
Program will find best scale factor 


Scale factor for Y ** 

Number of inches to offset X axis 
No offset 

Number of inches to offset Y axis 
No offset 

Length of X axis ~- inches 

Length of Y axis - inches 


*I£ MODCURV is 2 or 3, then only the first 6 parameters need to be repeated. 


4 


r*Scale factor = 100/units per inch on plotted output. 


13. 


Parameter Name 


MODE 


TITLESIZ 


TITLE] 


TITLEN 


Space Requirements 


1120 decimal locations 


Error Returns 


No error return is used, however, an error return point is skipped |, 


Description 


Automatically calculate best axes 
offset for origin at lower left 
Locate origin at center 

Locate origin at lower left 
Locate origin at upper left 
Locate origin at upper right 
Locate origin at lower right 
Multiplier for lettering size. 
Basic size is .]1 inches. 

Location of first title. Title 
array must be at least 10 words of. 
BCD characters. Fill unused 
characters with blanks. 


Location of Nth title array 


/ 


in order to be compatible with FORTRAN subroutines. 


Input/Output Tape Mountings 


\ 
Plot data output on logical 48 through CO-OP Monitor. 


Input/Output Tape Formats 


See 160-A Graph Plot Program write-up for details. The basic form is 
titling information, axes annotation, and curve data with an end of 
No special end of tape mark is used to 


file separating graphs. 
terminate the tape. 


Cautions to Users 


a. If scale factors are defined, ‘then the appropriate axes offsets 
should also be defined. 


b. The normal width of the plotter paper is 10 inches. For best 
results, do not use a horizontal axis length greater than 9 


inches. 


14, 


15. 


c. The number of interpolations N required must comply with the 
following inequality: AI/2" > 1/100 where AI is the uniform 
(equal) increment along the horizontal axis. See reference 
for further details. 


Equipment Configuration 
CO-OP Monitor configuration with at least one output tape available. 


References 


This program uses 160-A Graph Plot Program (Data Centers Ident No. 
*B001) as a subset to drive the 165 plotter. 
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